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THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
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MASS8US 



DIGITAL 
DEC 



POP 

CECUb 



L»4IBUS 

L»ECT/iPE 



SEQ 0001 



»<i .REM t 

40 HISIUM 

41 

4^ 

4S OC* 83 REV. A FIRST RELEA .t 

44 rEe-84 HtV. B CORRECTIONS MADE TO; 

45 1. CORRECT VtCTOR AREA MAINTENANCE PROBLEM 

4b 2. PRE>/ENT ITESTN FROM GETTING OUT OF StNC WHEN 
4 7 SKIPPING DEStLECTEO lESTS. 

4A 3. TURN CACME MEMORY StSTEM OFF DClRING NON-CACHE TESTS, 

49 4. ENoJP«^ THAT CPt< ERROR REGISTER IS CLEARED AFTER 

50 COMPLFIION OF TrST THAT MIGHT CAUSE IT TO BE SET. 

51 5. SAVE PC AND CONTENTS OF R6 ON UNEXPECTED INTERRUPrs 

55 ADDITIONAL TESTS Tu IMPROVE TEST COVERAGE INCLUDE: 

54 1. NON FXISTANT MEMORr TRAP TEST 

55 
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79 .RCH € 

80 

81 

82 

8S 1.0 GENERAL INFORMATION 
84 

85 I. I PROGRAM ABSTRACT 
86 

87 THIS IS AN APT COMPATIBLE VERSION OF THE KDJll MEMORY MANAGEMENT 

88 DIAGNOSTIC. IT FOCUSES ON TESTING THE FUNCTIONALITY Of THE MEMORY 

89 MANAGEMENT FEATURES. THE TEST REQUIRES 4 MEGABYTES OF QBUS 

90 MEMORY TO FULLY TEST THE MMU ADDER. A SUBSET OF THE ADDER IS 

91 TESTED IF LESS THAN 4 MEGABYTES OF rCMORY IS AVAILABLE 

92 (MINIMUM OF 28 KBYTES). IN ADDITIONt FOR TESTING IN 

95 QBUS SYSTEMS WITH ONLY 18 ADDRESS BITS. A MEANS IS PROVIDED TO 

94 SKIP TESTS WHICH REQUIRE 22 BIT ADDRESSES. THIS FEATURE IS 

95 IMPLEMENTED BY SETTING BIT 08 IN THE SOFTWARE SWITCH REGISTER 

96 (LOCATION 176) TO A ONE. DEFAULT IS TO TEST 22 BIT ADDRESSES. 
97 

98 1.2 SYSTEM REQUIREMENTS 
99 

100 KDJll -A PROCESSOR MODULE 

101 ENSURE THAT HALT TRAP OPTION IS DISABLED (JUMPER W9 INSTALLED) 

102 32KW MEMORY 

103 Q-22 BACKPLANE (18 BIT QBUS MAY BE USED WITH REDUCED TEST COVERAGE) 

104 SERIAL LINE UNIT AND CONSOLE TERMINAL (CONSOLE TERMINAL NOT REQUIRED FOR APT) 
105 

106 1.5 RELATED DOCUMENTS AND STANDARDS 
107 

108 KDJll -A MODULE SPECIFICATION REV 2.2 

109 PDPll MAINDEC SYSMAC PACKA(;E 

110 Jll CONTROL CHIP SPECIFICATION 21-17679-00 

111 Jll DATA CHIP SPECIFICATION 21-17677-00 
112 

US 1.4 DIAGNOSTIC HIERARCY PREREQUISITES 
114 

115 THE KDJll CPU DIAGNOSTIC MUST RUN SUCCESSFULLY PRIOR 

116 TO RUNNING THE MEMORY MANAGEMENT TEST. 
117 

118 1.5 ASSUMPTIONS 
119 

120 IT IS ASSUMED THAT THE DIAGNOSTIC OPERATOR IS FAMILIAR WITH 

121 THE XXDP* OPERATING SYSTEM AND THE Jll MICRO-OOT. 
122 

123 2.0 OPERATING INSTRUCTIONS 
124 

125 2.1 LOADING AND STARTING PROCEEOURE 
126 

127 LOAD PROGRAM INTO MEMORY USING STANDARD XXDP» PROCEEDURES. 

128 THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND USING 

129 THE Jll MICRO-ODT G COMMAND TO START. THE PROGRAM 

150 IDENTIFICATION rCSSAGE WILL BE TYPED AFTER THE F[RST PASS 

151 OF THE COMPLETE PROGRAM. 
152 

155 2.2 PROGRAM OPTIONS 



154 



Fi 
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135 THE FOLLOWING ASSIGt#«NTS HAVE BEEN MADE FOR THE KOJll A 

156 DIAGNOSTIC SUITCH REGISTER BITS: 

137 

138 BIT#15 14 15 12 11 10 9 8 

139 « - « .* . • * . -* * * 

140 DON'T 18 BIT EXTENDED 

141 TEST ADDRESS CACHE 

142 BEVENT ONLY TESTS 

143 ♦ • --♦ - - . • . . »-. « .* . * 

144 

145 DEFAULT SETTINGS ARE TO TEST 22 BIT ADDRESSES. THE OTHER BITS HAVE 

146 NO CFFECT ON THE OPERATION OF THE PROGRAM. 
147 

148 PRIOR TO EXECUTING THE FIRST PASS OF THE DIAGNOSTIC THE OPERATOR 

149 UILL BE DIRECTED TO SET THE SUITCH REGISTER TO INDICATE WHETHER 

150 THE KDJll-A UNDER TEST IS IN A SYSTEM CONFIGURED FOR 18 OR 22 BIT 

151 ADDRESSirC. AN 18 BIT ADDRESS CONFIGURATION SHOULD BE INDICATED IF 

152 ANY 18 ADDRESS BIT ONLY MEMORY BOARDS RESIDE IN THE SYSTEM OR IF 

153 THE SYSTEM BACKPLANE DOES NOT SUPPORT 22 ADDRLSS BITS. 
154 

155 TO CHANGE THE SUITCH REGISTER! HALT THE PROGRAM. AND EITHER RESTART 

156 THE PROGRAM AT 200 ANSWERIFC THE INITIAL QUESTIONS. OR LOAD THE 

157 SOFTWARE SWITCH REGISTER (ADDRESS 176) WITH THE DESIRED OPTIONS AND 

158 RESTART THE PROGRAM USING THE Jll MICRO ODT P COMMAND. 
159 

160 2.3 OPERATION UNDER APT 

161 

162 THERE ARE NO DIFFERENCES IN THE EXECUTION OF THIS DIAGNOSTIC 

163 WHEN OPERATING IN AN APT ENVIRONMENT. PROBLEMS CAUSED BY THE 

164 ASYNCHRONOUS HALTS OF THE DIAGNOSTIC BY THE APT MONITOR HAVE 

165 NOT BEEN NOTED. 
166 

167 

168 3.0 ERROR INFORMATION 

169 

170 ERRORS WILL CAUSE THE FOLLOWING ERROR MESSAGE TO BE PRINTED: 

171 

172 ERROR DURING MMU TESTING 

175 ERROR ♦ « (UNIQUE ERROR NUMBER) 
174 ERROR PC • (PC AT TIME OF ERROR) 
175 

176 THE ERROR WILL THEN BE REPORTED TO APT AND THE PROGRAM 

177 UILL HALT, 
178 

179 4.0 PROGRESS REPORT 

180 

181 AT THE END OF EACH PASS THE DIAGNOSTIC NAME AND PASS COLINT ARE PRINTED. 

182 

185 6 
184 



Gi 
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185 .TITLE PROGRAM HEADER AND TABLES 

186 .S8TTL PROGRAn HEADER 
187 

188 .HCALL NEUTST.ERROEF. .EQUAT. .Kill .. J40CAT. . tEOP. . lAPTBLS. SETUP 

189 .MCALL .ITyPE. .ITYPDEC.ERRDF.BGNTST.ENOTST.BGNMOD.ENOMOO.CKLOOP 

190 .MCALL .HEADER. .SETUP, .«TRAP.BGNSUB.ENDSUB. . tACTll, , »APTHDB 

191 .MCALL .$APTYPE..»ERROR..»TTPOCT..»READ 
192 

195 
194 

195 .TITLE KDJll A MEMQRr MANAGEMENT DIAGNOSTIC 

196 s*COPrRIGMT (C) MARCH. 1984 

197 }*OIGITAL EQUIPMENT CORP. 

198 i«MAYNARO. MASS. 01754 

199 5* 

200 J* 

201 :*THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SrSMAC 

202 ;»PACKAGE (MAINDEC-11-DZQAC-C3). JAN 19. 1977, 

203 i* 

204 OOOOOl »TN»l 

205 160000 »SUR-160000 sjHALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TTPOUT 
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PROGRAn HEADER 



SEQ O007 



206 




207 




208 




209 




210 




211 




212 




213 




214 




215 




216 


001000 


217 




218 




219 




220 




221 


000011 


222 


000012 


225 


000015 


224 


000200 


225 


177776 


226 




227 


177774 


228 


177772 


229 


177570 


230 


177570 


231 




232 




233 


000000 


234 


Of. 0001 


235 


000002 


236 


000003 


237 


000004 


238 


000005 


239 


000006 


240 


000007 


241 


000006 


242 


000007 


243 




244 




245 


000000 


246 


000040 


247 


000100 


248 


000140 


249 


000200 


250 


000240 


251 


000300 


252 


000340 


253 




254 




255 


lOOOOO 


256 


040000 


257 


020000 


258 


010000 


259 


004000 


260 


002000 


261 


001000 



•TITLE GLOBAL AREAS 

.SBTTL GLOBAL EQUATES SECTION 



THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
ARE USED IN MORE THAN ONt TEST. 

; SBTTL BASIC DEr INI T IONS 

t*INITIAL ADDRESS OF THE STACK POINTER •** 1000 
STACK- 1000 

.EOUIV EMT. ERROR i:BASIC DEFINITION OF ERROR CALL 

.EQUIV lOT. SCOPE ; ;BASIC DEFINITION OF SCOPE CALL 



; ♦MISCELLANEOUS DEFINITIONS 

ilCOOE FOR HORIZONTAL TAB 
tiCOOE FOR LINE FEED 
s:C0OE FOR CARRIAGE RETURN 
:iCOOE FOR CARRIAGE RETURN LINE FEED 
i {PROCESSOR STATUS UORO 



HT 
LF 
CR« 
CRLF. 
PS- 
. EQUIV 
STKLMT 
PIRQ- 
OSUR- 
OOISP- 



11 

12 
15 
200 
177776 
PS.PSU 
177774 
177772 
177570 
177570 



jsSTACK LIMIT REGISTER 
s {PROGRAM INTERRUPT REQUEST REGISTER 
: {HARDWARE SWITCH REGISTER 
{{HAROUARE DISPLAY REGISTER 



{♦GENERAL PURPOSE REGISTER DEFINITIONS 



RO' 
Rl" 
R2' 
R3' 
R4' 
R5' 
R6' 
R7' 
SP- 
PC- 



«0 
*1 
«2 
#3 
K4 
#5 
«6 
#7 
46 
#7 



{ (GENERAL 

(GENERAL 

(GENERAL 

(GENERAL 
( {GENERAL 
({GENERAL 
((GENERAL 
{ (GENERAL 
({STACK POINTER 
( (PROGRAM COUNTER 



REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 



{♦PRIORITY LEVEL DEFINITIONS 

PRO" 0 ; (PRIORITY LEVEL 0 

PRl- 40 ((PRIORITY LEVEL 1 

PR2- 100 { (PRIORITY LEVEL 2 

PR3- 140 J {PRIORITY LEVEL 3 

PR4- 200 ((PRIORITY LEVEL 4 

PR5- 240 ( (PRIORITY LEVEL 5 

PR6' 300 ({PRIORITY LEVEL 6 

PR7- 340 ((PRIORITY LEVEL 7 

(♦"SWITCH REGISTER" SWITCH DEFINITIONS 

SW15- 100000 

SW14 - 40000 

SW13* 20000 

SW12- 10000 

SWll- 4000 

SWIO' 2000 

SW09 - 1000 
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Ann 

M W 


Cv ~ 






POO 








xw 








AO 


CvO 






so 


Cv ' 


WW XV 


JWW J 


lO 


9ftA 


l./WW*t 




4 


PM 

Cv~ 


vWW£ 






C ' v 


wwvx 


JMWW 


1 
X 








^U09 ^U<) 


?7? 




PQUTV 










CIJ07 SU7 

JWW • « r 






.EQUIV 


SU06 


275 




"equiw 


CU05 






.EQUIV 


SU04 . SU4 


377 




.EQUIV 


SU03 , SU3 






.EQUIV 


SU02.SU2 


279 




.EQUIV 


SUOl.SUl 


280 




.EQUIV 


SUOO.SUO 


281 








282 




j*OATA BIT DEFINITIONS (BITOO TO BIT15) 


383 


100000 

A WWW 


BIT15- 


100000 


284 


040000 


BIT14- 


40000 


285 


020000 

Vfc WW 


BIT13- 


20000 


286 


010000 

V A www 


BIT12- 


10000 


287 


004 OOO 

W^ WW 


BITll- 


4000 


288 


002000 

W W fc w w w 


BITIO- 


2000 


289 


OOlOOO 

WW A www 


BIT09> 


1000 


290 


000400 
ww^ww 


BIT06- 


400 


291 


000200 

WWw£WW 


BIT07- 


200 


292 


OOOlOO 

www ^vw 


BIT06- 


100 


293 


0O0O40 
wwww^w 


BIT05- 


40 


294 


00OO20 

wwwwcw 


BIT04- 


20 


295 


000010 

wwww &w 


BIT03- 


10 


296 


000004 

wwwww^ 


BIT02- 


4 


297 


000002 


BITOl- 


2 


298 


000001 

www WW A 


BITOO- 


1 


299 




. EQUIV 


BIT09.BIT9 


300 




.EQUIV 


BIT06.BIT8 


301 




.EQUIV 


BIT07.BIT7 


302 




.EQUIV 


BIT06.BIT6 


303 




.EQUIV 


BIT0S.BIT5 


304 




.EQUIV 


BIT04,BIT4 


305 




.EQUIV 


BIT03.BIT3 


306 




.EQUIV 


BIT02.BIT2 


307 




.EQUIV 


BITOl.BITl 


308 




.EQUIV 


BITOO. BITO 


309 






310 




t *BASIC 


"CPU" TRAP VECTOR ADDRESSES 


311 


000004 


ERRVEC- 


4 it TIME OUT AND OTHER ERRORS 


312 


000010 


RESVEC- 


10 siRESERVED AND ILLEGAL INSTRUCTIONS 


313 


000014 


TBITVEC 


•14 ,j"T" BIT 


314 


000014 


TRTVEC- 


14 ii TRACE TRAP 


315 


000014 


BPTVEC' 


14 s (BREAKPOINT TRAP (6PT) 


316 


000020 


IOTVEC» 


20 1 1 INPUT /OUTPUT TRAP (lOT) ••SCOPE«« 


317 


00C024 


PURVEC- 


24 :iPOUER FAIL 
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316 000030 EMTVEC> 30 ; i EMULATOR TRAP (EHT) •*ERROR** 

319 000034 TRAPVEC-34 tj-TRAP" TRAP 

320 000060 TKVEC- oO j;TTY KErBOARO VECTOR 

321 000064 TPVEC- 64 ijTTr PRINTER VECTOR 

322 000240 PIRQVEC-240 s : PROGRAM INTERRUPT REQUEST VECTOR 

323 .SBTTL MEMORY MANAGEMENT DEFINITIONS 
324 

325 !*KT11 VECTOR ADDRESS 
326 

327 000^50 MMVEC- 250 
326 

329 s*KTll STATUS REGISTER ADDRESSES 
330 

331 177572 SRO- 177572 

332 177574 SR1« 177574 

333 177576 SR2» 177576 

334 172516 SR3- 172516 
335 

336 s*USER "I" PAGE DESCRIPTOR REGISTERS 
337 

338 177600 UIPDRO- 177600 

339 177602 UIPDRI- 177602 

340 177604 UIPDR2- 177604 

341 177606 UIPDR3- 177606 

342 177610 UIPDR4* 177610 

343 177612 UIPDR5- 177612 

344 177614 UIPDR6- 177614 

345 177616 UIPDR7. 177616 
346 

347 ;*USER "D" PAGE DESCRIPTOR REGISTORS 
348 

349 177620 UDPDRO- 177620 

350 177622 UDPORl" 177622 

351 177624 UDPDR2- 177624 

352 177626 U0PDR3- 177626 

353 177630 UDP0R4- 177630 

354 177632 UDPDR5- 177632 

355 177634 l«)PDR6- 177634 

356 177636 U0PDR7- 177636 
357 

358 s*USER "I" PAGE ADDRESS REGISTERS 
359 

360 177640 UIPARO- 177640 

361 177642 UIPARl- 177642 

362 177644 UIPAR2- 177644 

363 177646 UIPAR3- 177646 

364 177650 UIPAR4- 177650 

365 177652 UIPAR5- 177652 

366 177654 UIPAR6- 177654 

367 177656 UIPAR7- 177656 
368 

369 J •USER "0" PAGE ADDRESS REGISTERS 
370 

371 177660 UOPARO- 177660 

372 177662 UOPARl- 177662 

373 177664 U0PAR2- 177664 
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X7A 


1 1 'OOO 


O f 7 


1 77<i7n 
1 / /O ' V 


O f o 


1 77<i70 


Off 






1 77#17<1 


X7Q 








JO X. 






1 733nrt 
1 f ccvv 










^A^ 




^AA 




^A7 




^AA 




^AQ 


























1 7P33A 


JtO 


1 7333A 


^47 


X ' ccOV 




X ( cc^c 


399 


1 73P^fl 
X ' CCwH 


AGO 


X f ccOO 






402 




403 




404 


X ' CC"f V 


40S 


1 700A3 


■f WW 


1 733AA 
X » ec^H 






408 


X r cc3V 


409 


1 7P9S3 


410 


1 799i>4 
X ' Cc3*v 


411 


1 799itl« 

X f 


412 




413 




414 




41S 


X r ccvw 


416 


X ' CcOc 


417 


1 793AA 
X r ccO^ 


418 


X r ccOO 




1 733 7n 


420 


1 73373 


421 


1 73374 


422 


173376 


423 




424 




425 




426 


172300 


427 


172502 


428 


172304 


429 


172306 
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UDPAR3- 177666 
UDPAR4- 177670 
U0PAR5« 177672 
UDPAR6- 177674 
U0PAR7- 177676 

:*SUPERVISOR "I" PAGE DESCRIPTOR REGISTERS 

SIPDRO- 172200 

SIPDRl- 172202 

SIPDR2- 172204 

SIP0R5- 172206 

SIPDR4- 172210 

SIPDR5- 172212 

SIPDR6- 172214 

SIPDR7- 172216 

:*SUPERVISOR "0" PAGE DESCRIPTOR REGISTERS 

SDPDRO- 172220 
SOPDRl- 172222 
SDPDR2- 172224 
S0PDR3- 172226 
S0PDR4- 172230 
SOPORS- 172232 
S0P0R6- 172234 
S0P0R7- 172236 

i* SUPERVISOR "I" PAGE ADDRESS REGISTERS 

SIPARO- 172240 
SIPARl- 172242 
SIPAR2- 172244 
SIPAR3- 172246 
SIPAR4- 172250 
SIPAR5- 172252 
SIPAR6> 172254 
SIPAR7- 172256 

{♦SUPERVISOR "0" PAGE ADDRESS REGISTERS 

SDPARO- 172260 

SOPARl- 172262 

S0PAR2- 172264 

S0PAR3- 172266 

S0PAR4- 172270 

SDPAR5- 172272 

SDPAR6* 172274 

S0PAR7- 172276 

{•KERNEL "I" PAGE DESCRIPTOR REGISTERS 

KIPDRO* 172300 

KIPDRl- 172302 

KIPDR2- 172304 

KIP0R3« 172306 
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HEMORr MANAGEMENT OEFINITIONS 



SEQ 0011 



430 


172310 


KIP0R4- 172310 


431 


172312 


KIP0R5- 172312 


452 


172314 


KIP0R6- 172314 


433 


172316 


KIPDR7- 172316 


434 






435 




s ♦KERNEL "0" PAGE DESCRIPTOR REGISTERS 


436 






437 


172320 


KDPORO- 172320 


436 


172322 


KOPDRl- 172322 


439 


172324 


K0PDR2- 172324 


440 


172326 


K0P0R3- 172326 


441 


172330 


KDPDR4- 172330 


442 


172332 


K0P0R5- 172332 


443 


172334 


K0PDR6- 172334 


444 


172336 


K0P0R7- 172336 


445 






446 




t*KERNEL "I" PAGE ADDRESS REGISTERS 


447 






446 


172340 


KIPARO' 172340 


449 


172342 


KIPARl- 172342 


450 


172344 


KIPAR2- 172344 


451 


172346 


KIPAR3- 172346 


452 


172350 


KIPAR4- 172350 


453 


172352 


KIPAR5- 172352 


454 


172354 


KIPAR6- 172354 


455 


172356 


KIPAR7- 172356 


456 






457 




:*KERNEL "0" PAGE ADDRESS REGISTERS 


458 




459 


172360 


KOPARO- 172360 


460 


172362 


KDPARl- 172362 


461 


172364 


K0PAR2- 172364 


462 


172366 


K0PAR3- 172366 


463 


172370 


KDPAR4- 172370 


464 


172372 


K0PAR5- 172372 


465 


172374 


KDPAR6- 172374 


466 


172376 


K0PAR7- 172376 


467 






468 




1 THESE ARE FLOATING POINT ACCUMULATOR EQUATES 


469 


000000 


ACO- M 


470 


000001 


ACl- *l 


471 


000002 


AC2- #2 


472 


000003 


ACS- tf3 


473 


000004 


AC4- *A 


474 


000005 


AC5- *5 


475 


000006 


AC6'' «6 


476 


000007 


AC7- *7 


477 






478 


000244 


FPVEC- 244 


479 






480 




: THESE ARE CACHE REGISTER EQUATES 


481 


177746 


CCR- 177746 ;CACHE CONTROL REGISTER 


482 


177744 


MSER- 177744 ;M£MORy SYSTEM ERROR REGISTER 


483 


177752 


HITMIS- 177752 iHIT/MISS REGISTER 


484 


177766 


CPEREG- 177766 jCPU ERROR REGISTER 


485 







Mi 
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,EQ 0012 



466 

487 
488 
489 
490 
491 
492 
493 
494 
495 
496 
497 
498 
499 
500 
501 
502 
503 
504 
505 
506 
507 
508 
509 
510 
511 
512 
513 
514 
515 
516 
517 



531 
532 
533 
534 
535 
536 
537 
538 
539 
540 
541 



177546 
177560 
177562 
177564 
177566 
000000 
000001 
000001 
002000 



001000 
000000 



000000 



000046 
000052 



000204 
000046 
020026 
000052 
000000 
000204 



iMISCELANEOUS DEFINITIONS 



BE VENT 
RCSR- 
RBUF- 
XCSR- 
XBUF- 
ERRTN 
♦TSTNU-1 
ERRNUM- 1 
ASUREG- 2000 



177546 
177560 
177562 
177564 
177566 
HALT 



s BE VENT CONTROL REGISTER 



{INITIALIZE ERROR NUMBER COUNTER 
:SUR FOR APT --NO BEVENT TESTING 



sTHIS EQUATE DEFINES THE BOTTOM OF THE PROGRAM STACK POINTER 
STBOT- 1000 

.ASECT 

.SBTTL TRAP CATCHER 
.-0 

j*ALL UNUSED LOCATIONS OF THE VECTOR AREA CONTAIN 

j*A ".♦2, lOT" SEQUENCE TO CATCH AND PROCESS ILLEGAL 

; ♦TRAPS AND INTERRUPTS THAT MIGHT OCCUR. 

j*THE lOT TRAP WHICH IS TAKEN ON THE ILLEGAL TRAP/INT 

! ♦TRAPS TO THE »SCOPE ROUTINE WHICH CIF THE RETURN PC IS 

S^LESS THAN 1002) JUMPS TO THE lERROR ROUTINE. 

{♦THE lERROR ROUTINE WILL REPORT THE ERROR AS FOLLOWS: 

:♦ PC-YrYYYY UNEXPECTED TRAP TO XXX 

s^ANO RETURN TO THE PROGRAM AT PC-YYYYYY»2 

{♦WHERE XXX-LOCATION OF ILLEGAL TRAP 

{♦ YYYYYY-PC AT TIME OF TRAP 

{♦NOTE: IF THE PROCESSOR IS NOT AN 11/05 THE PROGRAM 

{♦ CAN BE STARTED AT ADDRESS 0 AS WELL AS ADDRESS 200. 



518 


000000 


000000 


$40CAT: 


HALT 




: :HALT 


519 


000002 


000737 




BR 


.100 


:;BRANCH TO 177700 £ TIME OUT 


520 












11/05) 


521 


000004 


001604 




.WORD 


START 


; {VECTOR TO STARTING ADDRESS 


522 


000006 


000340 




.WORD 


340 


{{WITH PRIORITY LEVEL 7 


523 




000174 




.-174 




524 


000174 


000000 


DISPREG 


:.WORD 


0 


5 .-SOFTWARE DISPLAY REGISTER 


525 


000176 


000000 


SWREG: 


.WORD 


0 


: {SOFTWARE SWITCH REGISTER 


526 






.SBTTL 


STARTING ADORESCES) 




527 


000200 


000137 001604 




JMP 


8«START ::G0 


TO START OF PROGRAM 


528 






.SBTTL 


ACT 11 


HOOKS 




529 












530 















{HOOKS REQUIRED BY ACT 11 
$SVPC-. 
.-46 
»ENDAD 
.-52 

.WORD 0 
.-♦SVPC 

.SBTTL APT PARAMETER BLOCK 



(SAVE PC 

{{DSET L0C.46 TO ADDRESS OF $EN0AD IN . »EOP 

{ {2)SET L0C.52 TO ZERO 
{{ RESTORE PC 



{ ; ***«****«*«****««***«**««*«***«*««******«****♦******♦***♦**«♦** 

{SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 



Ni 



GLOB At. 


AREAS 


HACYll 


KOJllA.MAC 20-rMR-B4 


542 






543 




000204 


544 




000024 


545 


000024 


A A A AAA 

000200 


546 




000044 


547 


000044 


000204 


545 




000204 


549 






550 






551 






552 






553 


000204 




554 


000204 


A AA A A^ 

000000 


555 


000206 


AA« A^^A 

001000 


556 


^002 10 


A AAA A 4 

000001 


557 


000212 


A AAA A A 

000002 


e if A 

558 


000214 


A/\AA/\A 

000000 


559 


000216 


000014 








561 




000002 


562 


000002 


000000 


563 


000004 


000006 


564 


000006 


000004 


565 




000204 


566 




001000 



20 MAR 64 11:31 PAGE 13 
APT PARAMETER BLOCK 



SEQ 0013 



.*X». siSAVE CURRENT LOCATION 

.-24 SI SET POWER FAIL TO POINT TO START OF PROGRAM 

200 SI FOR APT START UP 

.-44 ::POINT TO APT INDIRECT ADDRESS PNTR. 

tAPTHOR ;s POINT TO APT HEADER BLOCK 

.-.$X stRESET LOCATION COUNTER 

i SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDPll DIAGNOSTIC 
; INTERFACE SPEC. 



iAPTHO 

»HIBTS 

«MBADR 

♦TSTM: 

$PASTM: 

$UNITM: 

.-.*X 

.-2 

0 

6 

4 

.=.»X 
.-1000 



.WORD 0 ::TUO HIGH BITS OF 18 BIT MAILBOX ADOR. 

.WORD $MAIL ;jA0DRESS OF APT MAILBOX (BITS 0-15) 

.WORD 1 ;:RUN TIM OF LONGEST TEST 

.WORD 2 :sRUN TIME IN SECS. OF 1ST PASS ON I UNIT (QUICK VERIFY) 

.WORD 0 s:ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 

.UORO $ETEN0'$MAIL/2 s t LENGTH MAILBOX-ETABLE(UORDS) 
iSAVE CURRENT LOCATION COUNT 



sSET UP SOME VECTORS 
;RESTORE LOCATION COUNT 



GLOeAi AREAS MAC^ll 30A( 
KOJllA.HAC ^0 HAR 84 U: 

560 

570 
S"! 
57J 
575 
•174 
5/5 
576 

577 001000 

578 00.000 000000 

579 001002 000000 

580 001004 000000 

581 001006 000000 

582 001010 000000 

583 001012 000000 

584 001014 000000 

585 001016 000000 

586 001020 

587 001020 000 

588 001021 000 

589 U01022 002000 

590 001024 000000 

591 001026 000000 
592 

595 
594 
59S 
596 
597 

598 001050 
599 
600 
01 
j02 
605 

604 001050 000000 

605 001032 000000 
606 

607 

608 001034 000000 

609 001036 000000 

610 001040 000000 

611 001042 000000 

612 001044 000000 

613 001046 177570 

614 001050 177570 

615 001052 000000 
616 

617 001054 000000 
. 18 001056 000000 

619 001060 000000 

620 001062 000000 

621 001064 000000 
622 



> riAR 84 11:51 PAGE 14 
GLOBAL DATA SECT ION 



SEQ O014 



.S8TTL GLOBAL DATA S^ICTION 



I 
I 
I 



THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
IN riORE THAN ONE TEST. 



.SBTTL APT riAlLBOX-ETABLE 



.EVEN 
•HAIL : 
IMSGTY: 
•FATAL: 
»TESTN: 
IPASS: 
lOEVCT: 
lUNIT: 
♦MSGAO: 
*riSGLG: 
♦ETABLEi 
SENV: 
lENVM: 
tSUREG: 
lUSUR: 
•CPUOP: 
i 
i 
t 
i 
I 

tETENO: 
.HEXIT 



1 1 APT HAILBOX 
.WORD AnSGTY i iHESSAGE TYPE CODE 
.WORD AFATAL i i FATAL ERROR NUMBER 
.WORD ATESTN iiTEST NUMBER 
.WORD APASS iiPASS COUNT 
.WORD AOEVCT i t DEVICE COUNT 
.WORD AUNIT 1 1 I/O UNIT NUMBER 
.WORD AMSGAO i t MESSAGE ADDRESS 
.WORD AMSGLG iiMESSAGE LENGTH 

1 1 APT ENVIRONMENT TABLE 
.BYTE AENV iiENVIHONMENT BYTE 
.BYTE AENVM i {ENVIRONMENT MODE BITS 
.WORD ASWREG i i APT SWITCH REGISTER 
.WORD AUSWR iiUSER SWITCHES 
.WORD ACPUOP nCPU TYPE. OPTIONS 

BITS 15 -11 -CPU TYPE 

11/04-01. 11/05-02. ll/20»05. 11/40-04, ll/45»05 
11/70-06. PDQ-07.Q- 10 

BIT 10-REAL TIME CLOCK 

BIT 9-FLOATING POINT PROCESSOR 

BIT 8-HEMORY MANAGEMENT 



J THESE LOCATIONS ARE USED IN MORE THAN ONE TEST TO STORE VECTOR DATA 
iWHEN THE TEST NEEDS TO HAVE AN ERROR CONDITION RESPOND DIFFERENTLY 
jFROM THE DEFAULT RESPONCE. 
SLOCOO: .WORD 0 
SLOCOl: .WORD 0 



I THESE 

EXPDAT 

RECDAT 

COUNT: 

FLAG: 

ERRCNT 

SWR: 

DISPLA 

•ERFLG 

» THESE 

DCOUNT 

ALLCTR 

LOOP IN 

SAVSPl 

SAVSP2 



LOCATIONS ARE USED 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD 0 

.WORD OSWR 
Y:.WORD DDISP 

.WORD 0 
LOCATIONS ARE USED 

.WORD 0 



.WORD 
.WORD 
.WORD 
.W3R0 



0 
0 
0 
0 



IN MORE THAN ONE TEST TO STORE WORKING DATA. 

(STORES EXPECTED (GOOD) DATA FOR COMPARISONS 

•STORES RECIEVED DATA TO BE VERIFIED 

lERROR INDICATOR FOR FLOATING POINT TESTS 

•USED TO STORE "FLAG" CONDITIONS 

I STORAGE FOR ERROR COUNT 

I STORAGE FOR SWITCH REGISTER ADDRESS 

I STORAGE FOR DISPLAY REGISTER ADDRESS 

I ERROR FLAG 

BY MORE THAN ONE TEST AS LOOP COUNTERS 



I STORAGE FOR UNEXPECTED TRAP DATA 



GLOBAL ARMS 
KOJllA.nAC 



HAC»n 50Atl05<>1 
20-MAR 84 11:19 



.'0 riAR 64 



t>^5 
6^4 
feJ5 
t>2t> 
€27 
b29 
62<* 
6S0 
6S1 
652 
635 
e34 
655 
656 
657 
658 
6 50 
640 



001066 
001070 
001072 
001074 
001076 
001 100 
001110 



001120 
001120 



APT H^iclix E tSIi ^ 



000000 


SAVSUP: 


.WORD 


0 


{USED 


TO 


STORE 


SUPERVISOR STACK VALUE 


000000 


SAVUSE: 


.WORD 


0 


(USED 


TO 


STORE 


USER STACK VALUE 


000000 


SAvmO: 


.UORO 


0 


lUSED 


TO 


STORE 


MHU STATUS REGISTER 0 DATA 


000000 


SAVMRl: 


.WORD 


0 


lUSED 


TO 


STORE 


MMU STATUS REGISTER 1 DATA 


000000 


SAVMR2: 


.UORO 


0 


lUSED 


TO 


STORE 


nnu STATUS register 2 DATA 


000004 


FLOAT: 


.BLKU 


4 


lUSED 


TO 


STORE 


VALUES fOR MMU TESTS 


000004 


FLO: 


.BLKU 


4 


lUSED 


TO 


STORE 


VALUES FOR MMU TESTS 



00000? 



t!!!!!THIS IS IT. THE PROGRAM TEST LOCATION AND WRITE BUFFER! !!!!!!!•*•!••!• f! 

TSTLOC: 

.BLKU 2 



D2 



"lEQ 0016 



t)4l 
642 

645 
644 

645 
646 

e47 
64 a 

649 
650 
651 
o52 
653 
654 
655 
656 
657 
658 
659 
660 
661 
662 
663 
664 
665 
666 
667 
668 
669 
670 
671 
672 
675 
674 
675 



001124 
001132 
001140 
001146 
001154 
001162 
001166 
001174 
001202 
001210 
001213 
001220 
001226 
001234 
001242 
001246 
001254 
001262 
001270 
001276 
001277 
001304 



005015 
044502 
020075 
020122 
052111 
042524 
005015 
020105 
046505 
051117 
015 
051117 
047111 
020125 
047111 
005015 
020122 
005015 
020122 
000 
015 
000 
001306 



042523 
020124 
020061 
034061 
051440 
000115 
040503 
054523 
042440 
000 
042412 
042040 
020107 
042524 
000107 
051105 
020043 
051105 
041520 



020124 
020070 
047506 
041040 
051551 

044103 
052123 
051122 

051122 
051125 
046515 
052123 

047522 
000075 
047522 
036440 



.SBTTL GLOBAL TEXT SECTION 

I THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS. 
; MESSAGES. AND ASCII INFORMATION THAT ARE USED IN 
; MORE THAN ONE TEST. 



\ FORMAT STATEMENTS USED IN PRINT CALLS 

0PMSG2: .ASCIZ <CR><LF>/SET BIT 8 - 1 FOR 18 BIT SYSTEM/ 

ERRMSG::.ASCI/ <CR><LF>/CACHE SYSTEM ERROR/ 
MMUERR: . ASCIZ <CR><LF>/ERROR DURING MMU TESTING/ 

ERRl: .ASCIZ <CR><LF >/ERROR » •/ 
ERR2: .ASCIZ <CR><LF>/ERROR PC "/ 



020012 020040 $CRLF: .ASCIZ «CR><LF>/ / 

• EVEN 



iSLOBAi ARf4b MACtll 30A(1052) ?0 tWR-S* ll:5l PAGE 17 qfo nni 7 

KOJllA.MAC 20-MAR 04 11:19 GLOBAL ERROR REPORT SECTION 

t>76 .S8TTL GLOBAL ERROR REPORT SECTION 
677 

678 i** 

679 ; THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 
6S0 J USED Br MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INTORMATION. 
66 1 ; - - 

t>92 



GLOBAi ARfMS 
KDJllH.MAC 



683 

604 

685 

686 

687 

688 

689 

690 

691 

692 

695 

o94 

695 

696 

697 

698 

699 

700 

701 

702 

703 

704 

/05 

706 

707 

708 

709 

ao 

7li 
712 
713 
714 
715 
716 
717 
718 
719 
720 
721 
722 
725 
724 
725 
726 
727 
728 
729 
750 
731 
732 
755 
754 
755 
756 
757 
738 



MAC) 11 50AC1O5J) 
20 nM 84 11:19 



001506 
001510 
001512 
001514 
001520 
001324 
001350 
001554 
001540 
001544 
001550 
001554 
001560 
001564 
001570 
001576 
001400 
001402 
001404 



001406 
001410 
001414 
001420 
001424 
001426 



001450 
001452 
001454 
001440 
001444 
001446 
001452 



001454 
001456 



010046 
010146 
010246 
012700 
004767 
00476/ 
004767 
012700 
004767 
004767 
004767 
004767 
004767 
004767 
012757 
012602 
012601 
012600 
000207 



005002 
012720 
062702 
022702 
001571 
000207 



005001 
010120 
062701 
022701 
001572 
012720 
000207 



005205 
000002 



F2 

20 MAR -84 11:51 PAGE 18 

GLOBAL SUBROUTINES SECTION 

•SBTTL GLOBAL SUBROUTINES SECTION 
s ♦ ♦ 

J THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBRQoTINES 
{ THAT ARE USED IN MORE THAN ONE TEST. 



tMMU GLOBAL SUBROUTINES 



SEQ 0018 



{ROUTINE TO INITIALIZE MEMORY MANAGEMENT 
MMU: 



177600 
000062 
000100 
000074 
172200 
000042 
000060 
000054 
000026 
000044 
000040 
000027 



172516 



077406 
000001 
000020 



MOV 
MOV 
MOV 
MOV 
JSR 
JSR 
JSR 
MOV 
JSR 
JSR 
JSR 
JSR 
JSR 
JSR 
MOV 
MOV 
MOV 
MOV 
RTS 



{ROUTINE TO 

PDA: CLR 
PDRl: MOV 
ADD 
CMP 
BNE 
RTS 



RO. -CSP) 
Rl, -CSP) 
R2,-(SP) 
*1 77600, RO 
PC.PDR 
PC, PAR 
PC, PAR 
*1 72200, RO 
PC.PDR 
PC, PAR 
PC. PAR 
PC.PDR 
PC. PAR 
PC. PAR 

027.SW172516 

(SP)»,R2 

CSP)».R1 

CSP)»,RO 

PC 

INITIALIZE POR'S 
R2 

077406. (RO). 

»1.R2 

•16. .R2 

PDRl 

PC 



I SAVE CONTENTS OF REGISTERS 



000200 
001600 

177600 



ROUTINE TO INITIALIZE PAR'S 



PAR: CLR Rl 

PARI: MOV Rl.(RO)t 

ADD •200. Rl 

CMP •1600. Rl 

BNE PARI 

MOV #1 77600. (RO). 

RTS PC 



TIME OUT ROUTINE 



i 



;INIT I AND D USER POR'S 
;INIT I USER PAR'S 
;INIT 0 USER PAR'S 

jINIT I AND 0 SUP PDR S 
jINIT I SUP PAR'S 
;INIT D SUP PAR'S 
:INIT I AND D KER PDR'S 
:INIT I KER PAR'S 
jINIT D KER PAR'S 
jINIT MMR5 
{RESTORE REGISTfRS 



ADDTRP: INC 
RTI 



R5 



RETURN 



INIT CNTR 
INIT PDR 
INCREMENT CNTR 
ARE WE DONE? 
BRANCH IF NOT 
{RETURN 



{SETUP TO INIT PAR 
*INIT PAR 

{GET READT FOR NEXT PAR 
{REACHED A PAR7 
{BRANCH IF NOT 
{INIT PAR 7 
(RETURN 



{INCREMENT TIME OUT FLAG 
{RETURN 



G2 



GtOBAL 


ARC AS 


HACtll 


30A(1032) 20 MAR 84 11 


i31 PAGE 19 


KOJllA. 


MAC 20 -MAR 84 


11:19 




GLOBAL 


Subroutines section 


739 

740 










:MMU TRAP ROUTINE 


741 


001460 


026727 


1 77356 


000001 


• 

MMUTRP: 


CMP 


FLAG.*1 


742 


001466 


001403 








BEQ 


It 


743 


0014 to 


104000 








ERROR 




744 


001472 


000001 








.WORD 


1 


745 


001474 


001213 








.WORD 


MMUERR 


746 


001476 


010046 






1*: 


MOV 


RO, (SP) 


747 


001500 


01S700 


177776 






MOV 


8#1 77776, RO 


746 


001504 


072027 


177764 






ASM 


# 14, RO 


749 


001510 


020027 


000002 






CMP 


R0,«2 


750 


001514 


001001 








BNE 


OK 


751 


001516 


000411 








BR 


NOTOK 


752 


001520 


013700 


177776 




OK: 


MOV 


a4ll77776,RO 


753 


001524 


072027 


000002 






ASM 


*2,R0 


754 


001530 


072027 


177764 






ASM 


•-14, RO 


755 


001554 


020027 


000002 






CMP 


R0,«2 


756 


001540 


001002 








Due 

BNE 


OKI 


757 


001542 


005066 


0OOOO4 




NOTOK: 


CLR 


4(SP) 


756 


001546 


013767 


177572 


177316 


OKI: 


MOV 


WM77572.SAVMR0 


759 


001554 


013767 


177574 


177312 




MOV 


8*177574, SAVMRl 


760 


001562 


013767 


177576 


177306 




MOV 


a«177576.SAVMR2 


761 


001570 


005037 


177572 






CLR 


S«177572 


762 


001574 


00506-' 


177242 






CLR 


FLAG 


763 


001600 


012600 








MOV 


(SP).,RO 


764 


001602 


000002 








PTI 



SEQ 0019 



:ARE UE EXPECTING AN ABORT 
sYES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 

iUNICK^ ERROR NUMBER 

{ADDRESS OF ERROR MESSAGE 

:SAVE CONTENTS OF REG 0 

tSAVE A COPY OF PSU 

I LOOK AT BITS<15:14> 

iUAS PS<15:14>>10 

sNO GO ON 

iYES CMANGE BITS TO 00 
I SAVE A COPY OF PSW 
;LOOK AT 8ITS< 13:12* 

luAS PS<13:12>>10 
:N0 GO ON 

i CLEAR ILLEGAL MODE FFROM OLD PSU 

J SAVE A COPY OF MMRO 

aSAVE A COPY OF MMRl 

sSAVE A COPY OF MMR2 

s CLEAR ABORT BITS AND TURN MMU OFF 

: CLEAR MMU ABORT FLAG 

sRESTORE ORIGINAL CONTENTS OF REG 0 

{RETURN 



KOJllA.MAC 



) 20 MAR- 



'G?SBAi434Ro5^5^?°SECTION 



5E0 O020 



765 
766 
767 
766 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
801 
602 
803 
604 
805 
806 
807 
808 
809 
810 
811 
812 
813 
814 
815 
816 
817 
818 
819 
820 



001604 








001604 


012737 


000014 


177746 


001612 


012706 


001000 




001616 


012737 


022304 


000030 


001624 


012737 


000340 


000032 


001632 


012737 


021756 


000034 


001640 


012737 


000340 


0000S6 


001646 


005067 


177134 




001652 


016767 


016116 


016106 


001660 


105067 


177166 





START: 
.SBTTL 



MOV •14.S«CCft 
INITIALIZE THE COMMON TAGS 



sSEl CACHE TO FORCE MISS 



001664 
001670 
001676 
001704 
001712 
001720 

001722 
001724 
001730 
001732 
001740 
001746 



013746 
012737 
012767 
012767 
022777 
001012 

000403 
012716 
000002 
012767 
012767 
012637 



000004 
001724 
177570 
177570 
177777 



001732 

000176 
000174 
000004 



000004 
177142 
177136 
177126 



177106 
177102 



001752 


005067 


177030 




001756 


132767 


000200 


177035 


001764 


001403 






001766 


012767 


001022 


177052 


001774 








001774 


012737 


022304 


000020 


002002 


012737 


000340 


000022 


002010 


005037 


177766 




002014 


012767 


001460 


176226 


002022 


104401 


001124 




002026 


005737 


000042 




002032 


001012 






002034 


126727 


176760 


000001 


002042 


001406 






002044 


026727 


176776 


000176 


002052 


001005 






002054 


104406 






002056 


000403 






002060 


112767 


000001 


017666 


002066 









I ; SETUP THE STACK POINTER 



♦STACK. SP 
FEW VECTORS 

#tERROR.fi»«EMTVEC j lEMT VECTOR FOR ERROR ROUTINE 
#340.8#EMTVEC»2 uLEVEL 7 

♦»TRAP.»*TRAPVEC iiTRAP VECTOR FOR TRAP CALLS 
«340.8«TRAPVEC»2t LEVEL 7 
♦PASS ;i CLEAR THE PASS COUNT 

♦ENOCT.IEOPCT ; j SETUP END OF -PROGRAM COUNTER 
»ERFLG ; {CLEAR THE ERROR FLAG 

:!SI2E FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT 
sjEQUAL TO A "-1". SETUP FOR A SOFTWARE SWITCH REGISTER. 



MOV 
INITIALIZE 
MOV 
MOV 
MOV 
MOV 
CLR 
MOV 
CLRB 



IS 



64» 
65 « 



66$ 



.MACRO 



(ARGl: 
.ENOM 



67»: 



TYPE 
.SBTTL 



MOV 
MOV 
MOV 
MOV 
CMP 
BNE 

BR 

MOV 

RTI 

MOV 

MOV 

MOV 



8#ERRVEC.-CSP) 
«64$.S«ERRVEC 
«OSWR.SWR 
♦ODISP. DISPLAY 
♦-1.8SWR 
66 1 

65 1 

«65$.(SP) 



! ;SAVE ERROR VECTOR 
J jSET UP ERROR VECTOR 

jj SETUP FOR A HARDWARE SUICh REGISTER 

ttANO A HARDWARE DISPLAY REGISTER 

5;TRY TO REFERENCE HARDWARE SWR 

j: BRANCH IF NO TIMEOUT TRAP OCCURRED 

tiANO THE HARDWARE SWR IS NOT • 1 

j:BRANCH IF NO TIMEOUT 

Si SET UP FOR TRAP RETURN 

i: POINT TO SOFTWARE SWR 



«SWftEG.SwR 
♦DISPREG. DISPLAY 
CSP)*.a«ERRVEC s (RESTORE ERROR VECTOR 



?«ARG1 



*$SETMAIL 
CLR »PASS 
BITB «APTSIZE,$ENVM 
BEQ lARGl 
MOV «>SUREG.SWR 

$$SETMAIL 

CLR »PASS 

BITB ♦APTSIZE.IENVM 

BEQ 67$ 

MOV ««SUREG.SWR 



J J CLEAR PASS COUNT 
j:TEST user SIZE UNDER APT 
I J YES. USE NON-APT SWITCH 
tiNO.USE APT SWITCH REGISTER 



I -.CLEAR PASS COUNT 

IS TEST USER SIZE UNDER APT 

YES, USE NON-APT SWITCH 
s;NO.USE APT SWITCH REGISTER 



MOV »$ERROR.a*IOTVEC 
MOV »340,a«I0TVEC»2 
CLR 8*177766 
MOV «MMUTRP,MMVEC 
.0PMSG2 J OPERATOR MESSAGE 

GET VALUE FOR SOFTWARE SWITCH REGISTER 



;SET UP lOT VECTORS 
I TO GO TO ERROR ROUTINE 
CLEAR CPU ERROR REGISTER 



66$: 
69$: 



TST 


S«42 


II ARE WE RUNNING UNDER XXOP/ACT? 


BNE 


68$ 


iiBRANCH IF YES 


CMPB 


$ENV.»1 


II ARE WE RUNNING UNDER APT? 


BEQ 


68$ 


1 1 BRANCH IF YES 


CMP 


SWR.«SWREG 


IS SOFTWARE SWITCH REG SELECTED? 


BNE 


69$ 


1 {BRANCH IF NO 


GTSWR 




ssGET SOFT-SWR SETTINGS 


BR 


69$ 




MOVB 


«1.$AUT0B 


IS SET AUTO MODE INDICATOR 



12 



GLOBAL 


AREAS 


MACUl 


30A(1052) 20 nt 


KOJllA. 


HAC 20 MAR 84 


11:19 




621 




iwint^7 


176712 




S22 


UVeV rc 


vie ' 3 r 


000014 


177746 


623 










82* 










625 










626 










627 










828 










829 










830 


AApi OA 








831 










832 










833 










834 


V/Vc IvV 








835 






176700 




836 


Oft? 1 0A 




175656 




837 




OO5057 


177572 




838 


VVCX X** 


OO^OX7 


001042 




839 


WC XbV 


013746 


000004 




840 


wc xc** 


01P7S7 

VXc f J r 


001454 


000004 


841 


vVC X 








84^ 


OOPl 'SA 

Wc X-J^f 


01 ^701 

VX • vX 


177572 




843 


wcx^v 


01 ^701 

VX^ * VX 


177574 




844 




Ol ^701 

VX ^ r VX 


177576 




845 


vVC X3V 


Ol ^701 

VXO » VX 


172516 




846 




Ol PAX7 


000004 




847 


nnpi Art 

vvc XOv 


OPO^P7 


000000 




848 


rtrt31 AA 


001 AOX 






849 


rtrtpi f^A 


1 OAOOO 
lv*f VVV 






850 










851 




001 PIT 






852 










353 


OOP 1 7 A 








854 










855 


OOP 1 74 








856 










857 










858 










859 


002174 








860 


OOPl 7 A 


OOSPA7 


176604 




861 


OOPPOO 


00^067 


175562 




862 


00PP04 


OOSOT7 


177572 




863 


OOPPIO 


W JV J I 


001042 




864 


00PP14 


VX irf • "•V 


000244 




865 


OOPPPO 


Ol 'K7Aft 
VX w • "to 


000246 




866 


00PPP4 


V X'i' • ~ V 


000004 




867 


002230 


01P737 


000246 


000244 


868 




VAC * w f 


000002 


000246 


869 


002P44 


VAC « W f 


001454 


000004 


870 


002252 


005005 






871 


002254 


012700 


172200 




872 


002260 


005020 






873 


002262 


020027 


172400 




874 


002266 


001374 






875 


002270 


012700 


177600 




876 


002274 


005020 
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GET VALUE FOR SOFTWARE SWITCH REGISTER 



SEO 0021 



RESTART: CLR 
MOV 



♦TESTN 
«14.S«CCR 



iKESET »TESTH TO ZERO 
»S£^ CACHE TO FORCE MISS 



.SBTTL MEMORT MANAGEMENT TESTS 



BEGIN MMU TESTING 



TSMMUl: 



i*TEST 1 



STATUS REGISTER TEST 



TSTl: 



INC 


♦TESTN 


J INCREMENT TEST NUMBER 


CLR 


CPEREG 


jCLEAR CPU ERROR REGISTER 


CLR 


a«177572 


J TURN MMU OFF 


CLR 


S«FLAG 


! CLEAR MMU TRAP FLAG 


MOV 


8»4,-(SP) 


J SAVE OLD VECTOR 


MOV 


«ADDTRP.S»4 


; SETUP NEW VECTOR 


CLR 


R5 


; CLEAR FLAG 


MOV 


8#177572.R1 


! TEST MMRO 


MOV 


8«177574.R1 


; TEST MMRl 


MOV 


S#177576,R1 


; TEST MMR2 


MOV 


9«172S16.R1 


: TEST MMR3 

5 RESTORE VECTOR 


MOV 


(SP)*.8«4 


CMP 


R5.W 


;DID WE TRAP 


BEQ 


1» 


sNO. THEN BRANCH 


ERROR 




jALL ERRORS TO TRAP TO EMT 


.UORO 


2 


: UNIQUE ERROR NUMBER 


.UORO 


MMUERR 


i ADDRESS OF ERROR MESSAGE 



1$; 

TSMMU2: 



stES. GO TO ERROR 



*TEST 2 
TST2: 



ADDRESS TEST OF PARS.PORS. AND FP REGS 



1*! 



2%: 



INC 


♦TESTN 


; INCREMENT TEST NUMBER 


CLR 


CPEREG 


; CLEAR CPU ERROR REGISTER 


CLR 


»#177572 


tMMU OFF 


CLR 


8«FLAG 


; CLEAR MMU TRAP FLAG 


MOV 


8*244, -(SP) 


J SAVE FP VECTOR 


MOV 


S«246.-(SP) 




MOV 


8*4. -(SP) 


sSAVE TIME OUT VECTOR 


MOV 


«246.a«244 


; SETUP NEW FP VECTOR 


MOV 


«2.8«246 




MOV 


•A0DTRP.B«4 


'setup new time OUT VECTOR 


CLR 


R5 


J CLEAR TIMEOUT FLAG 


MOV 


♦1 72200. RO 


{LOAD ALL PARS AND PDRS WITH 


CLR 


(RO)* 


i 


CMP 


RO. •172400 


t 


BNE 


!♦ 


I 


MOV 


•17 7600. RO 


t 


CLR 


rRO)» 


i 



GLOBAL ARfAS MACVU 50A{1052) 20 MAR 84 
KOJllA.MAC 20 MAR 84 11:19 T2 



11:31 PAGE 22 

ADDRESS TEST OF PARS.PDRS. AND FP REGS 



SEQ 0022 



877 


002276 


020027 


177700 




CMP 


RO. #177700 


878 


002302 


001374 






BNE 


2$ 


879 


002304 


170127 


000200 




LDFPS 


*200 


880 


002310 


012700 


001100 




MOV 


«FL0AT.RO 


881 


002314 


005020 






CLR 


(RO)*^ 


882 


002316 


005020 






CLR 


CRO)» 


883 


002320 


005020 






CLR 


(R0)» 


884 


002322 


005020 






CLR 


(R0)» 


885 


002324 


012700 


001100 




MOV 


«FLOAT,RO 


886 


002330 


172410 






LDO 


(RO).ACO 


887 


002332 


172510 






LOD 


(RO).ACl 


888 


002334 


172610 






LOD 


(R0J.AC2 


889 


002336 


172710 






LOD 


CR0).AC3 


890 


002340 


174004 






STD 


AC0,AC4 


891 


002342 


174005 






STO 


AC0.AC5 


892 


002344 


174500 




3$: 


OIVD 


ACO.ACl 


893 


002346 


170337 


001110 




STST 


8«FL0 


894 


002352 


012704 


001110 




MOV 


«FLO,M 


895 


002356 


022427 


000004 




CMP 


(R4)t.«4 


896 


002362 


001403 






BEQ 


21$ 


897 


002364 


104000 






ERROR 




898 


002366 


000003 






.WORD 


3 


899 


002370 


001213 






.WORD 


MMUERR 


900 














901 


002372 


021427 


002344 


21»: 


CMP 


(R4).»3$ 


902 


002376 


001403 






BEQ 


22$ 


903 


002400 


104000 






ERROR 




904 


002402 


000004 






.WORD 


4 


905 


002404 


001213 






.WORD 


MMUERR 


906 














907 


002406 


012704 


172200 


22$: 


MOV 


«1 72200. R4 


908 


002412 


012701 


000001 




MOV 


♦l.Rl 


909 


002416 


010102 




4$: 


MOV 


R1.R2 


910 


002420 


072227 


000010 




ASM 


«10.R2 


911 


002424 


021427 


000000 




CMP 


(R4),00 


912 


002430 


001403 






BEQ 


5$ 


913 


002432 


104000 






ERROR 




914 


002434 


000005 






.WORD 


5 


915 


002436 


001213 






.UORO 


MMUERR 


916 














917 


002440 


010224 




5$: 


MOV 


R2.CR4)* 


918 


002442 


005201 






INC 


Rl 


919 


002444 


020427 


172400 




CMP 


R4.« 172400 


920 


002450 


001362 






BNE 


4$ 


921 


002452 


012704 


177600 




MOV 


«1 77600, R4 


922 


002456 


010102 




Si: 


MOV 


R1.R2 


923 


002460 


072227 


000010 




ASH 


*10.R2 


924 


002464 


021427 


000000 




CMP 


CR4).«0 


925 


002470 


001403 






BEQ 


7$ 


926 


002472 


104000 






ERROR 




927 


002474 


000006 






.WORD 


6 


928 


002476 


001213 






.UORD 


MMUERR 


929 














930 


002500 


010224 




7$: 


MOV 


R2.(R4)* 


931 


002502 


005201 






INC 


Rl 


932 


002504 


020427 


177700 




CMP 


R4,«177700 



i 

I LOAD ACO AC5 WITH 0 
t 



LOAD FEC WITH 4 AND FEA UlTH «3$ 
CHECK FEC FOR 4 AND FEA FOR •3$ 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

CHECK EACH PAR. PDR FOR 0 THtN 
WRITE A UNIQUE NUMBER TO IT 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



;ALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 



GLOBAL 


AREAS 


MACYll 


30AC lOS; 


KOJllA.HAC 20 -MAR -84 


11:19 














Al ^7AA 

012704 


001110 


fSO 




Al ^7AV 


001100 




w23ec 


4 7A A f A 
174014 




"ra f 




1 72405 




OVA 




1 74013 




MS"* 




Al ^7AD 

012 rO£ 


000004 




00e304 




000000 






AA4 AAV 
OU14UJ 




OA^ 


AAOCA O 


« AA AAA 
10400V 




QAX 


AA9^AA 


AAAAA7 




OA A 




AA1 01 X 




OA^ 








OAiL 




AA^XAO 




7 




rtfti X7n 




OA A 




Al 07AX 


001100 


QAQ 




Al 371 X 


000006 






1 73a 1 X 




Q*\1 








^JC 












1 7AA1 X 






AA0^7A 


Al 07A0 


000004 






AO0X07 


000000 


^OO 




AA1 A AX 
UU14UJ 




Q*\7 

r 




« AAAAA 








AAAni A 








AA1 31 X 




TVS/ 












AA^XAO 








AA1 X7A 






HA DA OA 


Al 07AX 


001100 




AAOAOA 


Al 371 X 

012 lis 


000005 




AAOA XA 


1 73A 1 X 
1 r24U 




TOO 




1 7 A AAA 

1 74004 




QA7 

f 


AAOATA 


Al 37A3 

012 702 


000004 


TOO 


nOOAAA 
V/V/CO'*U 


A00A07 
Uec4c r 


000000 


TO T 




AA1 AAX 




Q70 

T f W 


nn?AAA 


1 AAAAA 

iW4uyy 








AAoni 1 




7 f C 




vvxclo 




7 r ^ 
















Q7S 




Art 1 X 7A 




~ f o 


onsAAn 

vvcOOV/ 


Al 371 X 
Vic r lo 


000001 


Q77 


no 3 AAA 


1 73A1 X 




Q7A 


003AAA 


Al 37AA 


001110 


Q7Q 




ni 37A3 


000004 




n09A7A 


1 7A 1 1 A 
1 i"*H4 






AAP7AA 


n33A37 


000000 


982 


002704 


001403 




983 


002706 


104000 




984 


002710 


000012 




985 


002712 


001213 




986 








987 


002714 


005302 




988 


002716 


001370 





l<2 

TEST OF PARS.PORS. 
6$ 

•FL0.R4 

•FLOAT. R3 

AC0.(R4) 

ACS.ACO 

AC0.(R3) 

*4,R2 

(R3)».00 

9$ 

7 

MMUERR 

R2 
8$ 

♦FLOAT. R3 

♦6.(R3) 

(R3).AC0 

AC0.AC5 

AC4.AC0 

AC0.(R3) 

♦4.R2 

CR3)».00 

111 

10 

HMUERR 

R2 
10$ 

•FLOAT. R3 

•5.CR3) 

(R3).AC0 

AC0.AC4 

•4.R2 

CR4)*.«0 

13» 

11 

MMUERR 

R2 
12) 

♦l.(R3) 

(R3).AC0 

•FL0,R4 

»4,R2 

AC1.(R4) 

(R4).,»0 

15» 

12 

MMUERR 

R2 
14$ 



AND FP REGS 



t CHECK ACS FOR ALL ZEROES THEN LOAD A 6 

I 

i 

I 

i 



I ALL ERRORS TO TRAP TO EMT VECTOR 

sUNIQUE ERROR NUMBER 

t ADDRESS OF ERROR MESSAGE 



t 

i CHECK AC4 FOR ALL ZEROES THEN LOAD A 5 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



CHECK ACO FOR ALL ZEROES THEN LOAD A 1 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



CHECK ACl FOR ALL ZEROES THEN LOAD A 2 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 





AREAS 


MACYll 






MAC 20-MAR-84 






002720 


012713 






002724 


172513 




001 


002726 


012704 


vvXllw 




002752 


012702 




QQX 


002 7S6 


174214 






002740 


022427 


www 




002744 


001403 




QQA 


002746 


104000 




OQ7 


002750 


000013 




OOfl 


002752 


001213 












1 rtnn 

i. vV/W 


002754 


005302 






002 '56 


001370 






002760 


012713 


WWV J 




002764 


172613 






002766 


012704 


001 1 10 

WX X Xw 




002772 


012702 


WVA/V** 




002776 


174314 






003000 


022427 


WWW 




003004 


001403 






003006 


104000 






003010 


000014 




101 1 


003012 


001213 












1013 


003014 


005302 






003016 


001370 




101^ 


003020 


012713 


WWV*V 


XvXw 


003024 


172713 




101 1 


003026 


012704 


wxxxv 


lOlA 


003032 


170214 




XwX7 


003034 


022714 




1090 


003040 


001403 




1021 


003042 


104000 






003044 


000015 






003046 


001213 




1024 










003050 


170127 


OAAdOn 

wvcw 


10?6 


003054 


012704 


1 722fVt 


10P7 


003060 


012701 


uuuuux 




003064 


010102 




1029 


003066 


072227 


nooni 0 

WWXW 


1030 

Xv 


003072 


022402 






003074 


001403 




1032 


003076 


104000 




1033 


003100 


000016 




1034 


003102 


001213 




1035 








1036 


003104 


005201 




1037 


003106 


020427 


1 79400 
X * c*vw 


1038 


003112 


001364 




1039 


003114 


012704 


1 77AOA 
X f row 


1040 


003120 


010102 




1041 


003122 


072227 


000010 


1042 


003126 


022402 




1043 


003130 


001403 




1044 


003132 


104000 





L2 

24 

TEST OF PARS.PORS. AND FP REGS 



SEQ 0024 



42. (R5) 

(R3).AC1 

♦FL0.R4 

04. R2 

AC2,(R4) 

CR4)».#0 

17$ 

15 

mUERR 

R2 
16$ 

#3.(R5) 

(R5),AC2 

•FL0.R4 

«4.R2 

AC3.(R4) 

(R4)»,*0 

19$ 

14 

MnUERR 

R2 
16$ 

•4.CR3) 
CR3).AC3 
•FL0.R4 
(R4) 

«100204.CR4) 
20$ 

15 

nilUERR 
«200 

«1 72200. R4 

«1.R1 

R1.R2 

#10. R2 

(R4}»,R2 

24$ 

16 

liMUERR 



(CHECK AC2 FOR ALL ZEROES THEN LOAD A 3 
i 



ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
! ADDRESS OF ERROR MESSAGE 



t CHECK AC3 FOR ALL ZEROES THEN LOAD A 4 



ALL ERRORS TO TRAP TQ EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



CHECK FPS FOR 100204 THEN LOAD IT WITH 200 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



CHECK PDR, PAR FOR UNIQUE NUMBERS 



ALL ERRORS TO TRAP TQ EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



Rl 

R4. 0172400 
23$ 

01 7 7600, R4 
R1.R2 
010, R2 
CR4)».R2 
26$ 



ALL ERRORS TO TRAP TO EMT VECTOR 



GLOBAL AREAS MACYll 30A(1052) 
KDJllA.MAC 20 MAR-84 11:19 



1045 
1046 
1047 
1048 
1049 
1050 
1051 
1052 
1053 
1054 
1055 
1056 
1057 
1058 
1059 
1060 
1061 
1062 
106S 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 
1079 
1080 
1081 
1082 
1083 
1084 
1085 
1086 
1087 
1088 
1089 
1090 
1091 
1092 
1093 
1094 
1095 
1096 
1097 
1098 
1099 
1100 



003134 
003136 

003140 
003142 
003146 
0031S0 
003154 
003160 
003162 
003164 
003166 
003172 
003174 
003176 
003200 

003202 
003206 
003212 
003214 
003216 
003220 

003222 
003224 
003226 
003232 
003254 
003236 
003242 
003244 
003246 
003250 

003252 
003256 
003262 
003264 
003266 
003270 

003272 
003274 
003276 
003302 
003304 
003306 
003310 

003312 
003316 
003322 
003324 
003326 
003330 



000017 
001213 

005201 
020427 
001364 
012701 
012704 
174014 
172405 
174011 
022127 
001403 
104000 
000020 
001213 

012703 
022127 
001403 
104000 
000021 
001213 

005303 
001370 
012701 
172404 
174011 
022127 
001403 
104000 
000022 
001213 

012703 
022127 
001403 
104000 
000023 
001213 

005303 
001370 
022427 
001403 
104000 
000024 
001213 

012703 
022427 
001403 
104000 
000025 
001213 



177700 

001100 
001110 



000006 



000003 
000000 



001100 
000005 



000003 
000000 



000001 



000003 
000000 



M2 



25 



TEST OF PARS.PDRS. AND FP REGS 



SEQ 0025 



17 

MHUERR 
Rl 

R4. 01 7 7700 
25* 

♦FLOAT. Rl 

*FL0.R4 

AC0,(R4) 

ACS.ACO 

ACO.(Rl) 

(Rl)*.#6 

27$ 

20 

MMUERR 

03. R3 

(R1)».<K) 

29$ 

21 

MMUERR 

R3 
28$ 

♦FLOAT, Rl 
AC4.AC0 
ACO.(Rl) 
CRD*. 05 
30$ 

22 

MMUERR 

♦3.R3 

CR1)»,00 

32$ 

23 

MMUERR 

R3 
31$ 

(R4)*.^l 
33$ 

24 

MMUERR 

♦3.R3 

(R4)*.«0 

35$ 

25 

MMUERR 



; UNIQUE ERROR NUMBER 

t ADDRESS OF ERROR MESSAGE 



J CHECK ACS FOR «e 



;ALL ERRORS TO TRAP TO EMT VECTOR 
; UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 



;ALL ERRORS TO TRAP TO EMT VECTOR 

; UNIQUE ERROR NUMBER 

: ADDRESS OF ERROR MESSAGE 



CHECK AC4 FOR 05 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



CHECK ACO FOR «1 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
! ADDRESS OF ERROR MESSAGE 



GLOBAL AREAS MACYll 30A(1052) 
KDJllA.MAC 20-MAR 84 11:19 



1101 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1110 
1111 
1112 
1113 
1114 
1115 
1116 
1117 
1118 
1119 
1120 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1129 
1130 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1138 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 
1149 
1150 
1151 
!152 
llbS 
1154 
1155 
1156 



003332 
003334 
003356 
003342 
003344 
003350 
003352 
003354 
003356 

003360 
003364 
003370 
003372 
003374 
003376 

003400 
003402 
003404 
003410 
003412 
003416 
003420 
003422 
003424 

003426 
003432 
003436 
003440 
003442 
003444 

003446 
003450 
003452 
003456 
003460 
003464 
003466 
00347C 
005472 

003474 
003500 
003504 
00350A 
OC5->i0 
0Ci512 

003514 
003516 
003520 
003524 



005303 
001370 
012701 
174111 
022127 
001403 
104000 
000026 
001213 

012703 
022127 
001403 
104000 
000027 
001213 

005303 
001370 
012701 
174211 
022127 
001403 
104000 
000030 
001213 

012703 
022127 
001403 
104000 
000031 
001213 

005303 
001370 
012701 
174311 
022127 
001403 
104000 
000032 
001213 

012703 
022127 
001 

104000 
000033 
001213 

005303 
001370 
020527 
001403 



001100 
000002 



000003 
OOOOOO 



001100 
000003 



000003 
OOOOOO 



001100 
000004 



000003 
OOOOOO 



OOOOOO 



N2 

:31 PAGE 26 

ADDRESS TEST OF PARS.PDRS. 



DEC 


R5 


BNE 


34$ 


MOV 


♦FLOAT. Rl 


STD 


ACl.CRl) 


CMP 


CR1)*.«2 


BEQ 


36$ 


ERROR 




.WORD 


26 


.WORD 


MMUERR 


MOV 


«3.R3 


CMP 


CR1)*,«0 


BEQ 


38 » 


ERROR 




.WORD 


27 


.WORD 


MMUERR 


DEC 


R3 


BNE 


37$ 


MOV 


«FL0AT.R1 


STD 


AC2,CR1) 


CMP 


(Rl)*,«3 


BEQ 


39$ 


ERROR 




.WORD 


30 


.UORD 


MMUERR 


MOV 


«3,R3 


CMP 


CRD* ,W 


BEQ 


41$ 


ERROR 




.WORD 


31 


.WORD 


MMUERR 


DEC 


R3 


BNE 


40$ 


MOV 


OFLOAT.Rl 


STD 


AC5,(R1) 


CMP 


(Rl)*.tf4 


BEQ 


42$ 


ERROR 




.UORD 


32 


.WORD 


MMUERR 


MOV 


«3.R3 


CMP 


CRD*. 00 


BEQ 


44$ 


ERROR 




.WORD 


53 


.WORD 


MMUERR 


DEC 


R3 


BNE 


43$ 


CMP 


R5.«0 


BEQ 


45$ 



SEQ O02t 

AND FP REGS 



! CHECK ACl FOR «? 
I 

'all errors TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



CHECK AC2 FOR «3 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



CHECK ACS FOR «4 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



IS TIME OUT FLAG 0 
YES GO ON 



GtOBAL 


AREAS 


riAcm 


50AC1052) 


^0 riAR 84 11 


:51 PAGf 


KOJllA, 


,MAC 20 -MAR 84 


11:19 


T2 


ADDRESS 


lib.' 










ERROR 


1156 




VUUV34 






.WORD 


1159 




UUlelo 






.WORD 


1160 












1161 






000004 


45$: 


MOV 


1162 




At 3^S7 


000246 




MOV 


1163 


0U5544 


Al ^^17 


000244 




MOV 


1164 












1165 








TSMMU5: 




1166 












1167 








l»TEST 


5 


116« 












1169 








TST5: 




1170 




AA^OJ^ 7 


175250 




INC 


1171 




UVDVo ' 


177572 




CLR 


11-'^ 






001042 




CLR 


1175 




Vic r UO 


172200 




MOV 


1174 




Vic 'CO 


177777 


1«: 


MOV 


1175 




A30X37 
VcVOc r 


172400 




CMP 


1176 




<V>1 <7X 
\^10 ' O 






BNE 


1177 




Vie r VO 


177600 




MOV 


1178 




Vic f CO 


177777 


2«: 


MOV 


1179 




VcVOc ' 


177700 




CMP 


1100 


W3X> lO 


Wl 0 1 0 






BNE 


1181 




Al 07AX 
Ulc 'Uo 


172200 




MOV 


1182 




A33X37 
VCCOC ' 


177416 


31: 


CMP 


1183 


AAXi^TA 


AA1 Af\% 






BEQ 


1184 




1 AA/V>A 
IV^VVV 






ERROR 


1185 




VUWoo 






.WORD 


1186 




AA1 31 V 
VUlclo 






.WORD 


1187 












1188 


a/^x<;aa 


VcUoc ' 


172240 


4t: 


CMP 


1189 




AA1 VA.7 
vUloO ' 






BNE 


1190 




Uccoc ' 


177777 


5«: 


CMP 


1191 




AAI AA< 






BEQ 


1192 




1 AAAAA 
1 V^UW 






ERROR 


1195 




A<Wt VA 






.WORD 


1194 




Wlclo 






.UORO 


1195 












1196 




A3A107 


172300 


61: 


CMP 


1197 




AA1 Xi^7 
WloO ' 






BNE 


1198 


AnxA7n 


Uccoc / 


177416 


7$: 


CMP 


1199 


woo ' ^ 


AAI AAY 
\A/l^VO 






BEQ 


1200 


WOO I o 


1 AA/V\A 
1 V^^AA/ 






ERROR 


1201 


AA»7AA 


AfWV>X7 
W\A/0 ( 






.WORD 


1202 




WlclO 






.WORD 


1203 












1204 




VCVOC r 


172540 


8«: 


CMP 


1205 


W J f XV 


AAI ^7 






BNE 


1206 


005712 


022527 


177777 


9»: 


CMP 


1207 


005716 


001403 






BEQ 


1208 


003720 


104000 






ERROR 


1209 


003722 


000040 






.WORD 


1210 


003724 


001213 






.UORO 


1211 












1212 


005726 


020527 


172400 


lot: 


CMP 



I 27 



TEST or PARS.PDRS. AND FP REGS 

I ALL ERRORS TO TRAP TO EMT VECTOR 
54 I UN I QUE EHROR NUMBER 

MMUERR I ADDRESS Of ERROR MESSAGE 

I NO GO TO ERROR 
(SP)»,8»4 iRESTORE TIME OUT VECTOR 

(SP)*.a*246 iRESTORE rp VECTOR 

(SP)*.M244 I 



URITE ALL PARS/PDHS WITH ONES THEN ZEROS 



SEO 002 7 



♦TESTN 

8#177572 

MFLAG 

♦1 72200. R5 

•177777. (RS). 

R3. •172400 

1< 

•177600. R3 
•177777, (R5). 
RS. •177700 
21 

•172200. R5 
(R5)». •177416 
4t 

35 

MMUERR 

R3. #172240 
51 

(R3)». •177777 
61 

56 

MMUERR 

R5, •172300 
5» 

(R5)..»177416 
8< 

57 

MMUERR 

R5. •172540 
71 

(R5). .•177777 
101 

40 

MMUERR 



I INCREMENT TEST NUMBER 
jMMU OFf 

I CLEAR MMU ABORT FLAG 

iLOAO ALL PARS AND PORS UlTM ONES 

I 

I 

i 

; 

i 

s 

I CHECK SPDRS FOR ONES 
i 

I ALL ERRORS TO TRAP TO EMT VECTOR 
iUNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



( CHECK SPARS FOR ONES 

I ALL ERRORS TO TRAP TO EMT VECTOR 
i UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



t CHECK KPORS FOR ONES 

I ALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 

I 

I CHECK KPARS FOR ONES 

!all errors TO TRAP TO EHT vtCTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MfcSSAcf 



R3. •I 72400 



C6 

!?b8??VASr^ ^0''A&i^A4'?fW§''^' ^^-S^ITrS^L^^AHS/PORS WITH ONtS THeN /EROS ''^''^ 





003732 


001367 






BNE 


9* 


1 




003734 


012705 


177600 




MOV 


«177600.R5 


1 CHECK UPDRS FOR ONES 


003740 


022327 


177416 


11*: 


CMP 


(R3).. 0177416 


1 




003744 


001403 






BEQ 


12* 


i 


1217 


003746 


104000 






ERRCm 




»ALL ERRORS TO TRAP TO EMT VECTOR 


1216 


003750 


000041 






.WORD 


41 


1 UNIQUE ERROR NUMBER 


1219 


003752 


001213 






.UORO 


MMUERR 


1 ADDRESS OF ERROR MESSAGE 


1220 












1 




1221 


003754 


020527 


177640 


121: 


ctv> 


R5. 0177640 


1 


1222 


005760 


001367 






BNE 


11* 


1 


1223 


003762 


022327 


177777 


131: 


CMP 


(R3)». 0177777 


1 CHECK UPARS FOR ONES 


1224 


003766 


001403 






BEQ 


14* 


1 


1225 


003770 


104000 






ERROR 




lALL ERRORS TO TRAP TO EMT VECTOR 


1226 


003772 


000042 






.UORO 


42 


tUNIQUE ERROR NUMBER 


1227 


003774 


001213 






.UORO 


MMUERR 


(ADDRESS OF ERROR MESSAGE 


1226 












i 




1229 


003776 


020327 


177700 


14*: 


CMP 


R5. 0177700 


i 


1230 


004002 


001367 






BNE 


13* 


1 


1231 


004004 


012703 


172200 




MOV 


0172200. R3 


iLOAD ALL PARS AND PDRS UllH ZEROES 


12S2 


004010 


012723 


000000 


15»: 


MOV 


00.(R3)» 


t 


1233 


004014 


020327 


172400 




CMP 


R3, 01 72400 


i 


1254 


004020 


001373 






BNE 


15* 


I 


1235 


004022 


012703 


177600 




MOV 


01 7 7600. R5 


I 


1236 


004026 


012725 


000000 


16* : 


MOV 


♦0.(R3)» 


t 


1237 


004032 


020327 


177700 




CMP 


R3, 0177700 


; 


1238 


004036 


001373 






BNE 


16* 


1 


1239 


004040 


012703 


172200 




MOV 


01 72200. R3 


:CHECK ALL PARS AND PDRS FOR ZEROES 


1240 


004044 


022327 


000000 


17«: 


CMP 


CR5)».00 


> 


1241 


004050 


001403 






BEQ 


16* 


t 


1242 


004052 


104000 






ERROR 




|ALL ERRORS TO TRAP TO EKT VECTOR 


1243 


004054 


000043 






.UORO 


43 


lUNIQUE ERROR NUMBER 


1244 


004056 


001213 






.UORO 


MMUERR 


1 ADDRESS OF ERROR MESSAGE 


1245 












i 




1246 


004060 


020327 


172400 


18* : 


CMP 


R3, 01 72400 


• 


1247 


004064 


001367 






BNE 


17* 


• 


1248 


004066 


012703 


177600 




MOV 


0177600. R3 




1249 


004072 


022327 


000000 


19*: 


CMP 


CR3)».00 


* 


1250 


004076 


001403 






BEQ 


20* 




1251 


004100 


104000 






ERROR 




lALL ERRORS TO TRAP TO EMT VECTOR 


1252 


004102 


000044 






.WORD 


44 


1 UNIQUE ERROR NUMBER 


1253 


004104 


001213 






.UORO 


MMUERR 


t ADDRESS OF ERROR MESSAGE 


1254 












ff 




1255 


004106 


020327 


177700 


20*: 


CMP 


R3. 0177700 


1 


1256 


004112 


001367 






BNE 


19* 


{ 


1257 














1258 


004114 






TSMMU4 


: 






1259 








J ♦TEST 








1260 








4 


TEST FOR ADJACENT 


SHORTS IN PARS/PORS 


1261 
















1262 


0O4114 






TST4 : 








1263 


004114 


005267 


174664 




INC 


»TESTN 


1 INCREMENT TEST NUMBER 


1264 


004120 


005037 


177572 




CLR 


80177572 


iMMU OFF 


1265 


004124 


005067 


174712 




CLR 


FLAG 


1 CLEAR MMU ABORT FLAG 


1266 


004130 


012700 


172200 




MOV 


01 72200. RO 


iLOAO SPORS UITH ALTERNATING PATTtRS 


1267 


004134 


012720 


052404 


1«: 


MOV 


052404, (RO). 


1 


1268 


004140 


012720 


125012 




MOV 


O125012.(R0). 


1 



J?S3??Va?b*'' .0"aSA^44*??U§^''^ -^^"^M* "'f^br''^86 ^8jA«NT SHORTS IN PARS/PDRS ^^^^ 



1269 


004144 


020027 


1 72240 




CMP 


RO, #172240 




1 


12 '0 




AA« V T « 
0015 'I 




Due 


1 ' 






12 '1 


AAA 4 C 1 

004152 


012720 


125252 


o • _ 


nov 


wl2525c; « V HO ; » 




.1 AAA (?DAOP 1 IT T*_i n\ TPBkiATTki#* nATTm&i 

iLOAD SrHHS WITH ALTLKNATING PATTERN 




004130 


A 4 T A 

012 ^20 


052525 




nuv 






• 




004162 


A'^AA^ 7 

020027 


172900 




LHP 


OA Al 7 3XAn 






1274 


004166 


AA4 V 7 4 

001571 






Okie 


<: » 






12 < 5 


AAA 4 TA 

004170 


A 4 O 7 OA 

012720 


AC Oil A^ 

0524 04 


XA . 


nuv 






■ 1 AAA tfDnDC LJT Tu Af TCDkiATTkif* DATTCBftl 


1276 


AAA 4 ^A 

0041 74 


A 4 ^ A 

012720 


123012 




MAU 

nuv 


A 1 !5C A 1 O ^ DA ^ A. 






1277 


AAA ^AA 

004200 


A AA ^ Y 

020027 


• T ^ V A A 

172540 






DA A% T^^AA 




* 


1278 


0O42O4 


AA4 V74 














12 »'» 


004206 


A 4 07 0A 
012 lEQ 


4 OCO^O 


At* 


nuv 


A1 DCD«%D rOA't., 




*l AAA I^DADC LlTTu A* TCDkiATTk^ DATTCDu 
iLUHU RKHHa Willi M^lcNNMIlMb KWIltRN 


1290 


A/\^')4 ^ 

0O4212 


A 4 070A 

012 (20 


AC OC OC 




MAW 

nuv 


A^3*%OC f DA t * 




* 


1201 


AAA 1 4 £ 

004216 


AOAAO 7 

02002 ' 


4 70AAA 

1 f 2*vO 




TMD 

LnK 


DA A1 TOAAA 






IZOe 


V704222 


AA4 X7 4 

0015 / 1 






DrIC 








128 S 


00422* 


A 4 O 7AA 

U12 'UO 


4 7 7<LAA 




MAW 

nuv 


Al 7 7^AA DA 




*l AAA . IDADC UTTU Al TCDklAT Tklf DATTCDkl 


I «Bm 




A 4 0 70A 
Vie reO 


AC O AAA 


C C • 

3» : 


nuv 


AC3A AA r DA ^ a. 






leos 




A 1 O 7 OA 


1 o«»n 1 p 




MAU 








Ie8D 


AAA OA A 


A0AA07 


1 77AAA 




TMD 

Lnr" 


DA A1 7 7AAA 








AAA 


AA4 X74 






BMP 
one 


c t 






Xc88 




A4 070A 


1 OCOCO 

Ic3c3c 


At* 


MAU 

nuv 






*l AAA k IDADQ UTTM Al TPDklATTkin DATTCDkl 




AAA 


A1 070A 


03c3c3 




MAU 

nuv 








lew 


AAAOC^ 

004230 


A0AA0 7 


4 777AA 




TMO 


DA A1 77 7AA 

KU ' f f UU 




• 






AA1 X71 






Dnc 


Hit 






1272 








i 












AAA 

00426* 


A 4 07AX 

OXe f WO 


4 700AA 




MAU 

nuv 


A1 70dAA DT 
»1 'CcUUfK^ 




*PmC^I/ cdadc 




AAA 0 7 A 


A0OXO7 

02cd2 ' 


ACOAAA 


7 t . 




i K J ^ • « wD^^UH 






lC7D 


AAA0 7A 


AA4 AAX 






Qpn 


Aft 








TiAA 0 7^ 


4 AAAAA 

10400U 






CDono 
CKKUK 






. Al r CDDADC TA TDAD TA CMT wCPTAD 
;MLL tKKUKb lU 1 HHr* lU tn 1 VcL 1 UH 




AAAXAA 


AAAAAQ 






* WUHU 


•ID 




*iluTAitf: COOAO KUMQCO 
SUTilUUC. CrtHUH nUnocN 


1 90A 


AAA VAO 


AA4 O 4 V 

001213 






. WUNU 


MMI IC DD 




.AAADCCC AC CDOAD MCCCAPC 
















t 






AAAXAA 


AOO XO 7 

02252 ' 


4 OCA 4 O 

123012 


At. 




i K3 ^ • , vl^DUlc 




• 




AAA XI A 


AA4 AAX 

0U1400 






acn 

DCU 


Qt 








AAA X 4 O 


4 AAAAA 

104000 






CDDAO 






. Al 1 CDDADC TA TDAD TA CMT l/C^ TAQ 
: HLL tKKUKb 'U 1 KHK lU tni VCL i UH 




AAAX4 A 


AAAAA& 






* WUHU 


*o 




.10LJTAftfr CDDAD kll fMDCD 


1 Tn^ 




AA4 01 X 






* WUKU 


HMi DD 




.AAADCCC AC CDDAD MCCCAPC 


1 














s 




louo 


AAAXOA 

VaW AeO 


AOA» 07 

02052 ' 


4 700AA 

1 72240 


'»» ; 




DT A1 7 "3 OA A 






lOU > 


AAA XOA 


AA4 XA.4 
001301 






Okie 


7 < 








AAA X3<> 


AO0XO7 


4 ococo 
123232 


4 A t . 

10> : 


CMD 






.PmCPV CDADC 




fV%A XX3 


AAt AAX 






OCA 


lift 
11 > 








AAAXXA 


4 AAAAA 






COO AD 






• Al 1 CDDADC TA TDAD TA CMT WC^TAD 
t MLL cHKUKb lU INnK lU cni VtL 1 UH 






AAAAA 7 






* WUHU 


A 7 
4 / 




. 1 tfklTni f CDDAD kll MDCD 




AAAXAA 
00*3^0 


AA4 04 V 
001210 






.WORD 


■AfeA IL.DD 

HHUtKH 




. AAADCCC AC CDDAD MCCCAPC 
; MUUHtbb Ur cHNUH ntbbHUt 


1 XI X 














t 




1 XI A 




AOOX07 

v£2oc f 


ACOCOC 

032323 


4 4 t . 

11* : 


Lnr 






• 


1 XI s 




AA1 AAX 
vWl*03 






DtU 


1 3ft 






1 XI A 


AAAXAA 


1 AAAAA 
l\MOUU 






COD AD 






* Al 1 CODAOC TA TOAD TA CMT UCTTAD 
S HLL. CnNUKb lU 1 NMP lU cn 1 VCLIUH 




AAAX^S 


AAAA^A 






UADA 
• WUHU 


CA 
3U 




• IMTAlIF COQAP KHMRCQ 


1318 


004 








UORD 






lADDRE^SS or ERROR MESSAGE 


1S19 














i 




1S20 


004356 


020327 


172300 


12*: 


CMP 


R5.«172300 






1321 


004362 


001361 






BNE 


10 » 






1322 


004364 


022327 


052404 


13»: 


CMP 


CR3)«. 452404 




t CHECK KPORS 


1323 


004570 


00140: 






BEQ 


14 1 






1324 


004372 


104000 






ERROR 






Iall errors to TRAP TO EMT VECTOR 



t 6 

GLOBAL ARFAS MACUl S0A(1052) ^0 MAR 64 PAGE 50 

KDJllA.MAC 20 MAR 84 11:19 T4 TEST FOR ADJACENT SHORTS 



IV5 


004374 


000051 






.UORD 


51 


15?6 


004376 


001213 






.UORO 


MMUERR 


1327 














1328 


004400 


022327 


125012 


14$: 


CMP 


CR5)«.<H25012 


1329 


004404 


001403 






BEQ 


15$ 


1330 


004406 


104000 






ERROR 




1331 


004410 


000052 






.WORD 


52 


1332 


004412 


001213 






.WORD 


MMUERR 


1333 














1334 


004414 


020527 


172340 


15$ : 


CMP 


R3, •172540 


1335 


004420 


001361 






BNE 


13$ 


1336 


004422 


022327 


125252 


16$; 


CMP 


(R5)* .•125252 


1337 


004426 


001403 






BEQ 


17$ 


1338 


004430 


104000 






ERROR 




1339 


004432 


000055 






.UORD 


53 


1340 


004434 


001213 






.UORO 


MMUERR 


1341 














1342 


004456 


022327 


052525 


17$: 


CMP 


CR3)» ,•52525 


1343 


004442 


001403 






BEQ 


18$ 


1344 


004444 


104000 






ERROR 




1345 


004446 


000054 






.UORD 


54 


1546 


004450 


001213 






.UORO 


MMUERR 


1547 














1548 


004452 


020327 


172400 


18$: 


CMP 


R3. •I 72400 


1549 


004456 


001361 






BNE 


16$ 


1350 


004460 


012703 


177600 




MOV 


•177600, R3 


1351 


004464 


022327 


052404 


- 19$: 


CMP 


(R3)* ••52404 


1352 


004470 


001403 






BEQ 


20$ 


1353 


004472 


104000 






ERROR 




1354 


004474 


000055 






.UORD 


55 


1355 


004476 


001213 






.UORO 


MMUERR 


1356 














1357 


004500 


022327 


125012 


20$: 


CMP 


CR3)». 01250 12 


1358 


004504 


001403 






BEQ 


21$ 


1359 


004506 


104000 






ERROR 




1360 


004510 


000056 






.UORD 


56 


1361 


004512 


001213 






.UORO 


MMUERR 


1362 














1363 


004514 


020327 


177640 


21>: 


CMP 


R3. #177640 


1364 


004520 


001361 






BNE 


19$ 


1365 


004522 


022527 


125252 


221: 


CMP 


CR3) ♦,•125252 


1366 


004526 


001403 






BEQ 


25$ 


1367 


004530 


104000 






ERROR 




1368 


004532 


000057 






.UORO 


57 


1369 


004SS4 


001213 






.WORD 


MMUERR 


1370 














1371 


004536 


022327 


052525 


23$: 


CMP 


CR3)»,#52525 


1372 


004542 


001403 






BEQ 


24$ 


1S75 


004544 


104000 






ERROR 






004D46 


000060 






.WORD 


60 


1375 


004550 


001213 






.UORO 


MMUERR 


1376 














1377 


004552 


020327 


177700 


24$: 


CMP 


R5. #177700 


1378 


004556 


001361 






BNE 


22$ 


1579 








• 






1380 








: REVERSE ALTERNATING PATTERN 



SEQ no SO 

N PARS/PDRS 

(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

I 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

( 

(CHECK KPARS 

'(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS Of ERROR MESSAGE 



(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQl^ ERROR NUMBER 
{ADDRESS or ERROR MESSAGE 



(CHECK UPORS 
{ 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR N^ER 
(ADDRESS OF ERROR MESSAGE 



(CHECK UPARS 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



GLOBAL 


ARf AS 


MACUl 


30AC 1052) 


20 riAR 84 


KOJllA 


MAC 20 riAR 84 


11:19 


T4 


1381 








s 


1S82 




Ulc rvv 


172200 




1383 




A1 070A 


125012 


25»: 


1384 




Ulc 


052404 




1385 




nOArt37 
UcUVC r 


172240 




1366 




AAI T71 






1387 




Al ^73A 


052525 


26»: 


1388 




A1 070rt 


125252 




1389 




A^AAD7 
OeUvc ' 


172500 




1390 




AA1 T71 
WIS ' 1 






1391 




rtl 373ft 
Ulc ' CV 


125012 


27$: 


1392 




ftl 37Pft 
Olc f cO 


052404 




1393 






172340 




1394 




001 X71 






1395 




ftl P730 


052525 


28 »: 


1396 




ftl 373ft 


125252 




1397 






172400 




1398 




ftfti X71 






1399 




ftl P70ft 


177600 




1400 




ft13730 


125012 


29$: 


1401 




01 3730 


052404 




1402 




ft3ftft37 
V/C WC r 


177640 




1403 




ftfti ^71 






1404 




ftl 3730 
vxc f cv 


052525 


30$: 


1405 




ftl 3730 

vXC f Cv 


125252 




1406 




ft30ft37 


177700 




1407 


AAA 71 3 


ftfti T71 






1408 








: 


1409 


AAA71 A 


A1 37AX 
UXc r 


172200 




1410 




ft33X37 


125012 


31$: 


1411 




ftfti AftX 






1412 


\A/H f CO 


1 ftAftftft 






1413 




ftftftft^l 






1414 




AAI 31 X 






1415 










1416 




ft33X37 


052404 


32$: 


1417 




ftfti Aft'I 
WX*»wO 






1418 




1 ftAftftft 






1419 




ftftnftA3 






1420 




ftfti 31 Y 






1421 










1422 




ft3ftX37 


172240 


33$: 


1423 




ftfti VAI 






1424 




033X37 


052525 


34$: 


1425 




ftfti AftS 






1426 


004764 








1427 




ftftftOAT 






1428 


» • v 


ftfti 31 X 
W X C X J 






1429 










1430 


004772 


022327 


125252 


35$: 


1431 


004776 


001403 






1432 


005000 


104000 






1433 


005002 


000064 






1434 


005004 


001213 






1435 










1436 


005006 


020327 


172300 


36$: 



11:31 PAG 
TEST FO 



nov 

MOV 
HOV 
CMP 
BNE 
MOV 
MOV 
CMP 
BNE 
MOV 
MOV 
CMP 
BNE 
MOV 
MOV 
CMP 
BNE 
MOV 
MOV 
MOV 
CMP 
BNE 
MOV 
MOV 
CMP 
BNE 

MOV 

CMP 

BEQ 

ERROR 

.UORO 

.WORD 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

CMP 

BNE 

CMP 

BEQ 

ERROR 

.UORD 

.WORD 

CMP 

BEQ 

ERROR 

.WORD 

.UORO 



CMP 



F3 

31 

ADJACENT SHORTS IN PARS/PORS 



SEQ 0031 



«1 72200. RO 
•125012, (RO). 
•52404. (flO)» 
R0.# 172240 
25$ 

♦52525. (R0)» 
♦125252. (R0)» 
RO.^ 172300 
26$ 

♦125012. (RO). 
♦52404. (RO)* 
RO. ♦172340 
27$ 

♦52525. (RO). 
♦125252. (R0)» 
RO. ♦172400 
28$ 

♦177600.ro 
♦125012. CRO). 
♦52404. (RO)* 
RO.^177640 
29$ 

♦52525, (RO). 
♦125252. (RO). 
R0,^177700 
30$ 

♦1 72200. R3 

(R3)*.^125012 

32$ 

61 

MMUFRR 

(R3)..^52404 
33$ 

62 

MTRJERR 

R3. ♦I 72240 
31$ 

CR3).. #52525 
35$ 

63 

MMUERR 

(.' i).. 0125252 
36$ 

64 

MMUERR 
R3, ♦I 72500 



LOAD SPORS WITH REVERSE PATTERN 



LOAD SPARS WITH REVERSE PATTERN 



LOAD KPORS WITH REVERSE PATTERN 



LOAD KPARS WITH REVERSE PATTERN 



LOAD UPDRS WITH REVERSE PATTERN 



LOAD UPARS WITH REVERSE PATTERN 



CHECK SPDRS 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS or ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
LMIQUE ERROR NUMBER 
ADDRESS or ERROR MESSAGE 



CHECK SPARS 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS or ERROR MESSAGE 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS or ERROR MESSAGE 



G3 



CLOeAL ARFAS MACfll 50AC1052) 
KDJllA.MAC 20 HAR 64 11:19 



1437 
1430 
1459 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1456 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1461 
1482 
1483 
1484 
1485 
I486 
1487 
1486 
1489 
1490 
1491 
1492 



005012 
005014 
0OS020 
00S022 
005024 
005026 

005030 
005034 
005036 
005040 
005042 

005044 
005050 
005052 
005056 
005060 
005062 
005064 

005066 
005072 
005074 
005076 
005100 

005102 
005106 
005110 
005114 
005120 
005122 
005124 
005126 

005130 
005154 
005156 
005140 
005142 

005144 
005150 
005152 
005156 
005160 
005162 
005164 

005166 
005172 
005174 
005176 
005200 



001561 
022527 
001405 
104000 
000065 
001215 

022527 
001405 
104000 
000066 
001215 

020327 
001361 
022327 
001403 
104000 
000067 
001213 

022327 
001405 
104000 
000070 
001213 

020327 
001361 
012703 
022327 
001403 
104000 
000071 
001213 

022327 
001403 
104000 
000072 
001213 

020327 
001361 
022327 
001405 
104000 
000073 
001215 

022527 
001403 
104000 
000074 
001213 



125012 



052404 



172540 
052525 



125252 



172400 

177600 
125012 



052404 



177640 
052525 



125252 



37*. 



38»: 



59$! 
40»: 



41i: 

42 1 : 
43<: 

44$: 



45*: 
46*: 



47*: 



?^ST^f86 lijACENT SHORTS 


IN 


PARS/PDRS 




BNE 


34 * 




s 






CMP 


(R5)* , 4125012 




jCHECK KPORS 




BEQ 


36* 




i 






ERROR 






>ALL ERRORS TO TRAP TO EMT 


VECTOR 


UORO 


65 




i 


UNIQUE ERROR NUMBER 




.WORD 


MMUERR 


1 


I 


ADDRESS OF ERROR MESSAGE 




CMP 


(R3)*. 052404 


• 






BEQ 


39* 




I 






ERROR 






t 


ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


66 




i UNIQUE ERROR NUMBER 




.UORD 


MMUERR 




1 


ADDRESS OF ERROR MESSAGE 




CMP 


R3. ♦172340 


s 








BNE 


37* 










CMP 


(R3)». #52525 






CHECK KPARS 




BEQ 


41* 




t 






ERROR 






I 


ALL ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


67 




; 


UNIQUE ERROR NUMBER 




.UORD 


MMUERR 




! ADDRESS OF ERROR MESSAGE 




CMP 


(R3)», #125252 




t 




BEQ 


42* 










ERROR 








ALL ERRORS '^0 TRAP TO EMT 


VECTOR 


.UORO 


70 






UNIQUE ERROR NUMBER 




.UORO 


MMUERR 






ADDRESS OF ERROR MESSAGE 




CMP 


R3. #172400 


• 








BNE 


40* 




I 




MOV 


#1<7600,R5 






CHECK UPDRS 




CMP 


(R3)». #12501? 










BEQ 


44* 










ERROR 








ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORD 


71 






UNIQUE ERROR NUMBER 




.UORD 


MMUERR 






; ADDRESS OF ERROR MESSAGE 




CMP 


(R3)*. #52404 


s 




i 




BEQ 


45$ 








ERROR 






5 ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORD 


72 




{UNIQUE ERROR NUMBER 




.UORD 


MMUERR 




tAOORESS or ERROR MESSAGE 




CMP 


fl5. #177640 


s 








BNE 


43$ 










CMP 


CR3).,#5252S 






1 CHECK UPARS 




BEQ 


47* 










ERROR 








IalL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


73 






{UNIQUE ERROR NUMBER 




.UORD 


MMUERR 


s 




.ADDRESS OF ERROR MESSAGE 




CMP 


(R3)», #125252 




1 




BEQ 


48* 










ERROR 








I ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORD 


74 






(UNIQUE ERROR NUMBER 




.UORO 


MMUERR 






(ADDRESS OF ERROR MESSAGE 





SEQ OC'I' 



\-\5 



GLOBAL AREAS 
KOJllA.MAC 



MACni 50 A( 1052) 
20 MAR 84 11:19 



20 MAR S4 
T4 



11:31 PAGE 33 

TEST rOR ADJACENT SHORTS IN PARS/PORS 



SEQ OOS3 



1493 


005202 


020527 


177700 




48<: 


CHP 


nV Jk 4 ^YTAA 

h3, 0177700 


1494 


005206 


001361 








BNE 


46$ 


1495 
















1496 


005210 








TSMMU5; 






1497 
















1498 










; ♦TEST 


5 


TtSi nnHu MdOK 1 c 


1499 










TS 15: 






1500 


005210 












1501 


005210 


005267 


4 ^ ^A 

173570 






XNC 


A TC C TIa 


1502 


005214 


012737 


4 £ AAAA 

160000 


4 T TC TO 

1 775 f2 




nov 


vloUUUU • QHri f t^fc 


1503 


005222 


005067 


173614 






CLK 


r LMU 


1I>04 


005226 


A « V T AA 
013 f 00 


1 / f 3 »2 






MOW 

nuw 


£1ACD^ DA 


1505 


005232 


042700 


000176 






OIL 


A 4 T£. Da 

f O 4 KO 


1506 


005236 


020027 


4 £ AAAA 

IdOOOO 






^MO 


DA A 4 £. A A A/^ 

KU t 4rl.DUUUU 


1507 


005242 


001403 








DcU 




1508 


005244 


il Ad AAA 

104000 








CHHUH 




1509 


005246 


/\AAATC 

OOOO'S 








UAOA 

.UUKO 




1510 


005250 


AA « Of V 

001213 








LjAon 
. MUHU 


nnutKK 


1511 














■ 


1512 


005252 


AAC A V ^ 

005037 


4 T TC TO 

177572 




4 # - 

1 s : 


CLK 




1513 


005256 


A 4 V TAA 

013 rOO 


177572 






MAU 

nuv 


OACDA DA 


1514 


005262 


Ail ^ ^ AA 

042700 


AAA 4 T£ 

OOOl7o 






DiU 


A1 T£. DA 
wl 'O .HO 


1515 


005266 


AOAAO"7 

020027 


OOOOOO 






cnK 


DA AA 


1516 


005272 


AA « Jl A V 

001403 








QC A 


O C 


1517 


005274 


« Ail AAA 

104000 








COD AO 




1516 


005276 


A AAA^£ 

000076 








LlAOA 


TA 


1519 


005300 


001213 








LjAOn 
.UUKU 


MMI f DD 

nnutKK 


1520 
















1521 


005302 


012737 


4 OAAAA 

120000 


4 TTCTO 

177572 


2» : 


nov 


Al "^AAAA DAI 7TC79 

»120000 • f t^f£ 


1522 


005310 


013700 


177572 






nov 


nJhPDA DA 

wSRO , RO 


1523 


005314 


042700 


AAA 4 Tf 

000176 






BIC 


Jfc 1 7£ DA 

»176,R0 


t C Oil 

IT>2* 


005320 


020027 


4 OAAAA 

120000 






/*MO 

cnp 


OA A1 ^AAAA 

RO > «1200uO 


1325 


005324 


001403 








DC A 


31 


1326 


005326 


4 Ail AAA 

104000 












152 ' 


005330 


AAAA ^ ^ 

000077 








.WORD 


TT 

7 7 


l320 


AAC V V 

005332 


001213 








.WORD 


nnutKK 




















AAC V Vil 


A 4 '7 W 

012737 


Ail AAAA 

040000 


4 T TC TO 

177572 


3* : 


nov 


AJIAAAA OA1 7TCTO 

#400Uu,«wl f f 5/2 


1331 


AAC WJt'^ 

005342 


A4 V ^AA 

013700 


177572 






nov 


OACDA DA 

WwbHO, KU 

Jk4 T£ AA 

»176 ,R0 


1532 


AAC Vil £ 

005346 


042700 


000176 






BIC 


1 

1.335 


003332 


020027 


Ail AAAA 

040000 






cnp 


DA A^AAAA 

KO f w4UUUU 


l3o4 


003 330 


001403 








BP A 

BEQ 


4 f 


13.33 


003500 


4 Ail AAA 

104 OOO 








coo AO 

cRRUR 




1 d£ 

l33o 


/\ACV£ ^ 


AAA 4 A A 

000100 








.mORO 


4 AA 

100 


133 r 


AAC V^il 

0033o* 


AAt ^4 V 

001213 








.mURO 


MMI If DO 

nnutRK 


133o 


AACS£.£. 
UU3300 








4» ; 






1 do 
IDS'* 
















1 

134U 


AAC 








TCMMI l£ 

1 5nnu& 


• 




1 1 
















1 












tf<;t mmqy rtt^ s 


1543 
















1544 


005366 








TST6: 






1545 


005366 


005267 


173412 






INC 


»TESTN 


1546 


005372 


005037 


177572 






CLR 


30177572 


154 7 


005376 


005067 


173440 






CLR 


FLAG 


1548 


005402 


012737 


000077 


172516 




MOV 


♦77.8*172516 



J INCREMENT TEST NUMBER 
jLOAD MMR0<15:13>»111 
t CLEAR MMU ABORT FLAG 
sSAVE SRO IN RO 

i CLEAR UNDEFINED BITS FROM SRO 
J CHECK MMRO 

Iall ERRORS TO TRAP TO EMT VECTOR 

; UNIQUE ERROR NUMBER 

; ADDRESS OF ERROR MESSAGE 

iLOAO MMRO'O 
jSAVE SRO IN RO 

; CLEAR UNDEFINED BITS FROM SRO 
; CHECK MMRO 

!alL errors to TRAP TO EMT VECTOR 

: UNIQUE ERROR NUMBER 

: address OF ERROR MESSAGE 



LOAD MMflO<15:13>>101 
SAVE SRO IN RO 

CLEAR UNDEFINED BITS FROM SRO. 
CHECK MMRO 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
J ADDRESS OF ERROR MESSAGE 

jLOAD MMR0<15:13>«010 
I SAVE SRO IN RO 

S CLEAR UNDEFINED BITS FROM SRO. 
CHECK MMRO 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



I INCREMENT TEST NUMBER 
J MMU OFF 

J CLEAR MMU ABORT FLAG 
sLOAD MMR3<5:0>'-'7 



GLOBAL ARCAS MACtll 30A(1052) 20 MAR -64 11:31 I 
KOJllA.UAC *>0-MAR-64 11:19 T6 TEST 



1549 


005410 


023727 


172516 


000077 




CMP 


1550 


005416 


001403 








BEQ 


1551 


005420 


104000 








ERROR 


1552 


005422 


000101 








.UORD 


1553 


005424 


001213 








.WORD 


1554 


005426 


005037 


172516 




1*: 


ClR 


1555 


005432 


023727 


172516 


000000 




CMP 


1556 


005440 


001403 








BEQ 


1557 


005442 


104000 








ERROR 


155S 


005444 


000102 








. WORD 


1559 


005446 


001213 








.WORD 


1560 


005450 


012737 


000052 


172516 


2* : 


MOV 


1561 


005456 


023727 


172516 


AAA AC A 

000052 




CMP 


1562 


005464 


001403 








A 

BEQ 


1563 


005466 


104000 








ERROR 


1564 


005470 


000103 








.WORD 


1565 


005472 


001213 








. UOHD 


1566 


005474 


012737 


000025 


172516 


31 : 


MOV 


1567 


005502 


023727 


4 4 £ 

172516 


000025 




CnP 


1568 


005510 


001403 








BEQ 


1569 


005512 


104000 








ERROR 


1570 


005514 


000104 








.UORD 


1571 


005516 


001213 








.WORD 


1572 


005520 








4* : 




1573 














1574 


005520 








TSMM6A: 




1575 










J ♦TEST 




1576 










7 


1577 










TST7: 




1578 


005520 










1579 


005520 


005267 


175260 






INC 


1560 


005524 


005037 


177572 






CLR 


1581 


005550 


005037 


001042 






CLR 


1562 


005534 


012737 


140000 


177776 




MOV 


1 Co V 


005542 


012706 


A A a MAM 

001000 






MOV 


1384 


005546 


010637 


001070 






MOV 


IDOS 


/%ACCC^ 

005552 


012737 


040000 


177776 




MOV 


1366 


005560 


012706 


001000 






MOV 


1 CA7 

X30 ' 


005564 


010637 


001066 






MOV 


1366 


005570 


012737 


030000 


177776 




MOV 


1367 


005576 


004767 


173504 






JSR 


1390 


005602 


012737 


000027 


172516 




MOV 


l37l 


005610 


013746 


000244 






MOV 


1392 


005614 


012746 


177777 






MOV 


1 CAT 

1393 


005620 


012737 


135072 


000244 




MOV 


1394 


005626 


012767 


077400 


171764 




MOV 


1 CAC 

1393 


005654 


012703 


000244 






MOV 


1 CA£ 

1596 


005640 


005237 


177572 






INC 


1 C07 

1397 


005644 


006523 








MFPI 










% 777 7iL. 

I f f f to 




r*MD 


1599 


005654 


001403 








BEQ 


1600 


005656 


104000 








ERROR 


1601 


005660 


000105 








.WORD 


1602 


005662 


001213 








.WORD 


1605 














1604 


005664 


005037 


177572 




1»: 


CLR 



E 34 

R3 BITS 5 0 



30172516. #77 
li 

101 

MMUERR 
8*172516 
8<M72516,<K) 
2$ 

102 

MMUERR 

052.W172516 
8*172516. #52 
5$ 

105 

MMUERR 

025.8*172516 
8*172516. ♦25 
4$ 

104 

MMUERR 



SEQ O034 



j check mmr5 

Iall errors to trap to e*it vector 

: unique error number 

i address of error message 

jLOAD MMR5<5:0>'0 
J check MMR3 

Iall errors to trap to emt vector 

J UNIQUE error NUMBER 
ADDRESS OF ERROR MESSAGE 
LOAD MMR3<5:0>-52 
CHECK MMR3 



ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERRUR NUMBER 
ADDRESS OF ERROR MESSAGE 
LOAD MMR5<5:0>-25 
CHECK MMR3 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



TEST MFPI (MOVE FROM PREVIOUS INST SPACE) 



♦TESTN 

8#177572 

a«FLAG 

•140000.8*177776 

♦STBOT.SP 

R6.S*SAVUSE 

♦40000.8*177776 

♦STBOT.SP 

R6.8*SAVSUP 

♦30000.8*177776 

PC.MMU 

♦27.a^l72516 

»^244.-(SP) 

♦177777, -CSP) 

♦135072.8^244 

♦77400.UDPDR0 

♦244. R3 

8^177572 

(R3). 

♦30010.8^177776 
II 

105 

MMUERR 
8*177572 



; INCREMENT TEST NUMBER 
jMMU OFF 

; CLEAR MMU ABORT FLAG 
; POINT TO USER SPACE 
INIT THE USER STACK POINTER 
SAVE USER SP 

POINT TO SUPERVISOR SPACE 
INIT THE SUPERVISOR STACK POINTER 
;SAVE SUPERVISOR SP 
SETUP PSU 
INIT MMU 
SETUP MMR3 

SAVE DATA AT TEST LOCATION 
J PUT KNOWN DATA ON TOP OF STACK 
; SETUP DATA AT TEST LOCATION 
I SETUP UDPDRO TO ABORT 
SETUP POINTER TO TEST LOCATION 
TURN MT^U ON 
TEST INSTRUCTION 
«IS PSU CORRECT 
. ES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
i ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

J TURN mu OFF 
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1605 


005670 


012737 


140000 


177776 




MOV 


1606 


005676 


020637 


001070 






CMP 


1607 


005702 


001403 








BEQ 


1608 


005704 


104000 








ERROR 


1609 


005706 


000106 








.WORD 


1610 


005710 


001213 








.UORD 


1611 














1612 


005712 


012737 


040000 


177776 


100$ : 


MOV 


161S 


005720 


020637 


001066 






CMP 


1614 


005724 


00140S 








BEQ 


1615 


005726 


104000 








ERROR 


1616 


005730 


000107 








.WORD 


1617 


005732 


0012 IS 








.WORD 


1616 














1619 


005754 


023727 


000244 


135072 


200* : 


CMP 


1620 


005742 


001403 








BEQ 


1621 


005744 


104000 








ERROR 


1622 


005746 


000110 








.WORD 


1623 


005750 


001213 








.WORD 


1624 














1625 


005752 


020327 


000246 




2t : 


CMP 


1626 


005756 


001403 








BEQ 


1627 


005760 


104000 








ERROR 


1628 


005762 


000111 








.WORD 


1629 


005764 


001213 








.WORD 


1630 














1631 


005766 


005037 


177776 




3»: 


CLR 


1632 


005772 


022627 


135072 






CMP 


1653 


005776 


001403 








BEQ 


1634 


006000 


104000 








ERROR 


1635 


006002 


000112 








.WORD 


1636 


006004 


001213 








.WORD 


1637 














1638 


006006 


021627 


177777 




4» : 


CMP 


1639 


006012 


001403 








BEQ 


1640 


006014 


104000 








ERROR 


1641 


006016 


000113 








.WORD 


1642 


006020 


001213 








.WORD 


1643 














1644 


^v^^^ ^^^^^ 

006022 


012737 


030017 


177776 


5f : 


MOV 


1645 


^^^^ ^ ^ A 

006050 


012737 


173621 


000244 




MOV 


1646 


006036 


012701 


000244 






MOV 


1647 


006042 


005237 


177572 






INC 


1648 


006046 


006511 








MFPI 


1649 


006050 


022737 


030011 


177776 




CMP 


1650 


006056 


001403 








BEQ 


1651 


006060 


104000 








ERROR 


1652 


006062 


000114 








.WORD 


1653 


006064 


001213 








.WORD 
















1655 


006066 


005057 


177572 




300$: 


CLR 


1656 


006072 


025727 


000244 


173621 




CMP 


1657 


006100 


001403 








BEQ 


1658 


006102 


104000 








ERROR 


1659 


006104 


000115 








.WORD 


1660 


006106 


001213 








.WORD 



J3 



E 35 

PI (MOVE TROM PREVIOUS INST SPACE) 



"^EQ r)035 



* 140000. 8# 17 77 76 
R6.8«SAVUSE 
lOOS 

106 

MMUERR 

#40000. a«177776 
R6.9«SAVSUP 
200 S 

107 

MMUERR 

a#244,«135072 
2$ 

110 

MMUERR 

R3.«246 
3$ 

111 

MMUERR 

8*177776 
CSP)», #135072 
4* 

112 

MMUERR 

(SP). #177777 
5> 

113 

MMUERR 

#30017. a#177776 
#173621.S«244 
«244.R1 
8#1 77572 
'Rl ) 

#30011, S#177776 
300 S 

114 

MMUERR 

a#177572 
a#244,#175621 
3011 

115 

MMUERR 



J POINT TO USER SPACE 
J IS USER SP CORRECT 
:rES GO ON 

tALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
; ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

s POINT TO SUPERVISOR SPACE 
;IS SUPERVISOR SP CORRECT 
tYES GO ON 

J ALL ERRORS TO TRAP TQ EMT VECTOR 
s UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

tIS TEST DATA QK 
I YES GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
:U^4IQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(IS R3 CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

SET PSW TO KERNEL MODE 
IS KERNEL STACK CORRECT 
YES GO ON 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
;N0 GO TO ERROR 

IS STACK CORRECT 
YES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(SETUP PSW 

(SETUP TEST LOCATION 
(SETUP Rl 
(TURN MMU ON 
(TEST INSTRUCTION 
(IS PSW CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(TURN MMU OFF 

(IS TEST LOCATION CORRECT 

(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
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1661 

1662 006110 020127 000244 

1663 006114 001403 

1664 006116 104000 

1665 006120 000116 

1666 006122 001213 
1667 

1668 006124 005037 177776 

1669 006130 022627 173621 

1670 006134 001403 

1671 006136 104000 

1672 006140 000117 

1673 006142 001213 
1674 

1675 006144 021627 177777 

1676 006150 001403 

1677 006152 104000 

1678 006154 000120 

1679 006156 001213 
1680 

1681 006160 005003 

1682 006162 005237 177572 

1683 006166 006503 

1684 006170 022737 000004 I 

1685 006176 001403 

1686 006200 104000 

1687 006202 000121 

1688 006204 001213 
1639 

1690 006206 005037 177572 

1691 006212 020327 000000 

1692 006216 001403 

1693 006220 104000 

1694 006222 000122 

1695 006224 001213 
1696 

1697 006226 022627 000000 

1698 006232 001403 

1699 006234 104000 

1700 006236 000123 

1701 006240 001213 
1702 

1703 006242 022627 177777 

1704 006246 001403 

1705 006250 104000 

1706 006252 000124 

1707 006254 001213 
1708 

1709 006256 012637 000244 

1710 

1711 

1712 006262 

1713 

1714 

1715 

1716 006262 



l<3 



R 84 11:31 PAGE 36 
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SEO 0036 



301 1 : 


CMP 


Rl.<^244 




6EQ 


302 1 




ERROR 






.WORD 


116 




.WORD 


MMUERR 


302 S : 


CLR 


80177776 




CMP 


(SP)» , •173621 




BEQ 


303$ 




ERROR 






.UORD 


117 




.UORD 


MMUERR 


303 > : 


CnP 


C SP ) ,0177777 




BEQ 


304 $ 




ERROR 






.WORD 


120 




.WORD 


MM! f BO 

"PTUtHK 


304 »: 


CLR 


R3 




INC 


S0177572 






R5 




CMP 


»4 ,8»17777o 




BEQ 


o» 




ERROR 






.WORD 


121 




.WORD 


MMUERR 


6» : 


CLR 


S#l 77572 




cnp 


R3 . 00 




BEQ 


7$ 




ERROR 






.WORD 


122 




.WORD 


MMUERR 


7 * . 
' » : 


cnp 


f CO A * JhA 




DCQ 


8» 




cKKUK 






.WORD 


123 




.WORD 


MMUERR 


8»: 


CMP 


(SP)*. 0177777 




BEQ 


9$ 




ERROR 






.WORD 


124 




.WORD 


MMUERR 


9$: 


MOV 


<SP)». 30244 



:N0 GO TO ERROR 

J IS Rl CORRECT 
jrES GO ON 

;ALL ERRORS TO TRAP TO EMT VECTOR 
J UNIQUE ERROR NUMBER 
J ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

sSET PSU TO KERNEL MODE 
lis STACK CORRECT 
J YES GO ON 

:ALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 
s ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 

:IS STACK CORRECT 
tYES GO ON 

jALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

5 SETUP SOURCE FOR NEXT TEST 

sTURN MMU ON 

J TEST INSTRUCTION 

J IS PSW CORRECT 

jYES GO ON 

;ALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 
: ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

;TURN MMU OFF 
;IS R3 CORRECT 
jYES GO ON 

sALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

sIS STACK CORRECT 
J YES GO ON 

5 ALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 
: ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

:IS STACK CORRECT 
:YES GO ON 

;ALL ERRORS TO TRAP TO EMT VECTOR 
J UNIQUE ERROR NUMBER 
: ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

;RESTORE TEST LOCATION 



TSMM6B: 

****** ********************************** 

*TEST 10 TEST MFPD (MOVE FROM PREVIOUS DATA SPACE) 

tSTlO: 



L3 
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1717 


006262 


005267 


172516 






INC 


ITESTN 






, INCREMENT TEST NUMBER 


1718 


006266 


005057 


177572 






CLR 


8*177572 






|MMU OFF 


1719 


006272 


005037 


001042 






CLR 


0«f LAG 






J CLEAR MMU ABORT FLAG 


1720 


006276 


012737 


140000 


177776 




MOV 


♦140000. a#l 77776 






! POINT TO USER SPACE 


1721 


006504 


010657 


001070 






MOV 


R6.S«SAVUSE 






J SAVE USER SP 


1722 


006310 


012737 


040000 


177776 




MOV 


♦4 0000. 80177776 






sPOINT TO SUPERVISOR SPACE 


1723 


006316 


010657 


001066 






MOV 


R6.8#SAVSUP 






sSAVE SUPERVISOR SP 


1724 


006322 


012757 


030000 


177776 




MOV 


♦50000. a«l 7 77 76 






S SETUP PSW 


1725 


006330 


004767 


172752 






JSR 


PC.MMU 






sINIT MMU 


1726 


006334 


012757 


000027 


172516 




MOV 


♦27,8*172516 






J SETUP MMR3 


1727 


006542 


015746 


000244 






MOV 


80244. CSP) 






J SAVE DATA AT TEST LOCATION 


1728 


006346 


012746 


177777 






MOV 


♦177777, -CSP) 






jPUT KNOWN DATA ON TOP OF STACK 


1729 


006352 


012757 


157002 


000244 




MOV 


♦157002.80244 






jSETUP DATA AT TEST LOCATION 


1730 


006360 


012767 


077400 


171212 




MOV 


♦77400, UIPORO 






: SETUP UIPORO TO ABORT 


1731 


006566 


012703 


000244 






MOV 


♦244. R5 






J SETUP POINTER TO TEST LOCATION 


1732 


006572 


005257 


177572 






INC 


8^177572 






jTURN MMU ON 


1735 


006576 


106525 








MTPO 


CR5)* 






; TEST INSTRUCTION 


1734 


006400 


022757 


030010 


177776 




CMP 


♦30010, 8*177776 






sis PSW CORRECT 


1755 


006406 


001405 








BEQ 


1« 






sYES GO ON 


1736 


006410 


104000 








ERROR 








;ALL ERRORS TO TRAP TO EMT VECTOR 


1737 


006412 


000125 








.UORO 


125 






: UNIQUE ERROR NUMBER 


1738 


006414 


001215 








.UORO 


MMUERR 






: ADDRESS OF ERROR MESSAGE 


1739 
















:N0 GO 


TO ERROR 


1740 


006416 


005057 


177572 




It: 


CLR 


8^177572 






:TURN MMU OFF 


1741 


006422 


012757 


140000 


177776 




MOV 


♦140000, 8^1 77776 






{POINT TO USER SPACE 


1742 


006450 


020657 


001070 






CMP 


R6.8^SAVUSE 






sis USER SP CORRECT 


1743 


006434 


001405 








BEQ 


loot 






$YES GO ON 


1744 


006436 


104000 








ERROR 








8 ALL ERRORS TO TRAP TO EMT VECTOR 


1745 


006440 


000126 








.WORD 


126 






S UNIQUE ERROR NUMBER 


1746 


006442 


001213 








.UORO 


MMUERR 






s ADDRESS OF ERROR MESSAGE 


1747 
















iNO 


GO 


TO ERROR 


1748 


006444 


012737 


040000 


177776 


100$: 


MOV 


♦40000,8*177776 






s POINT TO SUPERVISOR SPACE 


1749 


006452 


020657 


001066 






CMP 


R6,8*SAVSUP 






sis SUPERVISOR SP CORRECT 


1750 


006456 


001405 








BEQ 


200 1 






sYES GO ON 


1751 


006460 


104000 








ERROR 








bALL ERRORS TO TRAP TO EMT VECTOR 


1752 


006462 


000127 








.WORD 


127 






s UNIQUE ERROR NUMBER 


1753 


006464 


001213 








.UORO 


MMUERR 






s ADDRESS OF ERROR MESSAGE 


1754 
















:N0 


GO 


TO ERROR 


1755 


006466 


025727 


000244 


157002 


200S: 


CMP 


8^244, 0157002 






sIS TEST DATA OK 


1756 


006474 


001405 








BEQ 


2t 






sYES GO ON 


1757 


006476 


104000 








ERROR 








8 ALL ERRORS TO TRAP TO EMT VECTOR 


1758 


006500 


000130 








.UORO 


130 






8t*4IQUE ERROR NUMBER 


1759 


006502 


001213 








.UORO 


MMUERR 






8 ADDRESS OF ERROR MESSAGE 


1760 
















sNO 


GO 


TO ERROR 


1761 


006504 


020327 


000246 




2$: 


CflP 


R 3, 0246 






;IS R5 CORRECT 


1762 


006510 


001403 








BEQ 


3t 






sYES GO ON 


1763 


006512 


104000 








ERROR 








8 ALL ERRORS TO TRAP TO EMT VECTOR 


1764 


006514 


000131 








.UORO 


131 






8 UNIQUE ERROR NUMBER 


1765 


00651S 


001213 








.UORO 


MMUERR 






8 ADDRESS OF ERROR MESSAGE 


1766 
















iNO 


GO 


III r FVPVl IVV 


1767 


006520 


005037 


177776 




3$: 


CLR 


8^177776 






5 SET PSW TO KERNEL MODE 


1768 


006524 


022627 


157002 






CMP 


(SP)».^ 157002 






8 IS KERNEL STACK CORRECT 


1769 


006530 


001405 








BEQ 


4» 






sYES GO ON 


1770 


006532 


104000 








ERROR 








8 ALL ERRORS TO TRAP TO EMT VECTOR 


1771 


006534 


000152 








.UORO 


132 






: UNIQUE ERROR NUMBER 


1772 


006536 


001215 








.UORO 


MMUERR 






8 ADDRESS OF ERROR MESSAGE 
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17 7* 

1 ( » 3 














Ml A 

i, 1 I H 






1 77777 




A% : 


CMP 














8EQ 


1 776 












ERROR 


1777 












.WORD 














iuORO 


















Ww J-J^ 


01P757 


0S0017 


177776 


5$ : 


MOV 


1781 




012737 


103456 


000244 




MOV 






012701 

WXC ' vx 


000244 






MOV 


1783 


006S74 


005237 


177572 






INC 


1 7A4 


006600 

Www 


106511 








I^PO 


A ■ 


006602 




030011 


177776 




CMP 


1766 


006610 


001403 








BEQ 


1787 


006612 


104000 








ERROR 


1788 


006614 


000134 








.WORD 


1769 


006616 


001213 

WW Afc JtV* 








.WORD 


1790 














1791 


006620 


005037 

^#Wa^WW ■ 


177572 




3001 : 


CLR 


1792 


006624 


023727 


000244 


103456 




CMP 


1795 


006632 


001403 








BEQ 


1794 


006634 


104000 








ERROR 


1795 


006636 


00013S 

WWW Av'a^ 








.WORD 


1796 


006640 


001213 

W JtC 








.UORO 


1797 














1796 


006642 


020127 


000244 




3011 : 


CMP 


1799 


006646 


001403 








BEQ 


1600 


0066 SO 


104000 








ERROR 


1601 


006652 


000136 

WW 








.WORD 


1802 


0066S4 


W AC 








.UORO 


1803 














1604 


006656 


005037 


177776 




3021 • 


CLR 


1805 


006662 


022627 


103456 






CMP 


1806 


006666 


001403 

WW A'^W*^ 








BEQ 


1807 


006670 


104000 








ERROR 


1606 


006672 


000137 








WORD 


1609 


006674 


001213 








UORO 


1810 














1811 


006676 


021627 


177777 




303$: 


CMP 


1812 


006702 


001403 








BEQ 


1813 


006704 


104000 








ERROR 


1614 


006706 


000140 








.WORD 


1815 


006710 


001213 








.WORD 


1816 














1817 


006712 


012737 


030017 


177776 


304$: 


MOV 


1818 


006720 


012737 


113672 


000244 




MOV 


1819 


006726 


012701 


000246 

W^*Wfc^%* 






MOV 


1820 


006732 


005237 


177572 






INC 


1621 


006736 


106541 








MFPD 


1822 


006740 


022737 


030011 


177776 




CMP 


1823 


006746 


001403 








BEQ 


1624 


006750 


104000 








ERROR 


1825 


006752 


000141 








.UORO 


1826 


006754 


001213 








.UORO 


1827 














1826 


006756 


005037 


177572 




400$: 


CLR 



M3 

E 38 

PO (MOVE FROM PREVIOUS DATA SPACE) 



SEQ 0038 



CSP).«177777 
5t 

133 

MMUERR 

•30017. M177776 

«103456.S«244 

«244.R1 

8#177572 

(Rl) 

«30011.S«177776 
300$ 

134 

MMUERR 

a«l77572 

8«244.«103456 

301$ 

135 

MMUERR 

Rl.«244 
302$ 

136 

MMUERR 

M177776 
(SP)». 01034 56 
303$ 

137 

MMUERR 

(SP). #177777 
304$ 

140 

MMUERR 

•30017. 8*177776 
«1 13672. 3«244 
«246.R1 
8#177572 

-CRD 

•30011. 801 7 7776 
400$ 

141 

MMUERR 
80177572 



:N0 GO TO ERROR 

lis STACK CORRECT 
lYES GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
: ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

: SETUP PSU 

I SETUP TEST LOCATION 

sSETUP Rl 

(TURN MMU ON 

J TEST INSTRUCTION 

sIS PSU CORRECT 

iYES GO ON 

;ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
s ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

sTURN MMU OFF 

;IS TEST LOCATION CORRECT 

:YES GO ON 

:ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(IS Rl CORRECT 
YES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

SET PSU TO KERNEL MODE 
IS STACK CORRECT 
YES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(IS STACK CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

SETUP PSU 

SETUP TEST LOCATION 
SETUP Rl 
(TURN MMU ON 
(TEST INSTRUCTION 
(IS PSU CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(TURN MMU OFF 



N3 



GLOBAL AREAS 
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TIO TEST MFPO CMOVE FROM PREVIOUS DATA SPACE) 



SEQ 0039 



1829 


006762 


023727 


000244 


113672 




CMP 


9*244. «1 136 72 




J IS TEST LOCATION CORRECT 




1830 


006770 


001403 








BEQ 


401 < 




iYES GO ON 




1831 


006772 


104000 








ERROR 






{ALL ERRORS TO TRAP TO EMT 


VECTOR 


1832 


006774 


000142 








.UORD 


142 




(UNIQUE ERROR NUMBER 




1833 


006776 


001213 








.UORD 


MMUERR 




i ADDRESS OF ERROR MESSAGE 




1834 
















:N0 GO 


TO ERROR 




1835 


OOiG'Vt 


020127 


000244 




401<: 


CMP 


Rl.«244 




ilS Rl CORRECT 




1836 


007004 


001403 








BEQ 


402 » 




lYES GO ON 




1837 


007006 


104000 








ERROR 






lALL ERRORS TO TRAP TO EMT 


VECTOR 


1838 


007010 


000143 








.UORD 


143 




1 UNIQUE ERROR NUMBER 




1839 


007012 


001213 








.WORD 


MMUERR 




(ADDRESS OF ERROR MESSAGE 




1840 
















iNO GO 


TO ERROR 




1841 


007014 


005037 


177776 




4021: 


CLR 


W177776 




(SET PSU TO KERNEL MODE 




1842 


007020 


022627 


113672 






CMP 


(SP)». 0113672 




{IS STACK CORRECT 




1843 


007024 


001403 








BEQ 


403$ 




iYES GO ON 




1844 


007026 


104000 








ERROR 






:ALL ERRORS TO TRAP TO EMT 


VECTOR 


1845 


007030 


000144 








.UORD 


144 




i UNIQUE ERROR NUMBER 




1846 


007032 


001213 








.UORD 


MHUERR 




{ADDRESS OF ERROR MESSAGE 




184 7 
















(NO GO 


TO ERROR 




1848 


007034 


021627 


177777 




403$: 


CMP 


(SP). #177777 




sis STACK CORRECT 




1849 


007040 


001403 








BEQ 


404$ 




iYES GO ON 




1850 


007042 


104000 








ERROR 






{ALL ERRORS TO TRAP TO EMT 


VECTOR 


1851 


007044 


000145 








.UORD 


145 




i UNIQUE ERROR NUMBER 




1852 


007046 


001213 








.UORD 


MMUERR 




{ADDRESS OF ERROR MESSAGE 




1853 
















iNO GO 


TO ERROR 




1854 


007050 


005003 






4041: 


CLR 


R3 




{SETUP SOURCE FOR NEXT TEST 


1855 


007052 


005237 


177572 






INC 


80177572 




{TURN MMU ON 




1856 


007056 


106503 








MFPD 


R3 




{ TEST INSTRUCTION 




1857 


007060 


022737 


000004 


177776 




CMP 


«4,»»177776 




{IS PSU CORRECT 




1858 


007066 


001403 








BEQ 


6$ 




{YES GO ON 




1859 


007070 


104000 








ERROR 






{ALL ERRORS TO TRAP TO EMT 


VECTOR 


1860 


007072 


000146 








.UORD 


146 




{UNIQUE ERROR NUMBER 




1861 


007074 


001213 








.UORD 


MMUERR 




{ADDRESS OF ERROR MESSAGE 




1862 
















iNO GO 


TO ERROR 




1863 


007076 


005037 


177572 




6$; 


CLR 


fWl 77572 




{TURN MMU OFF 




1864 


007102 


020327 


000000 






CMP 


R3.«0 




{IS R3 CORRECT 




1865 


007106 


001403 








BEQ 


7$ 




{YES GO ON 




1866 


007110 


104000 








ERROR 






{ALL ERRORS TO TRAP TO EMT 


VECTOR 


1867 


007112 


000147 








.WORD 


147 




{UNIQUE ERROR NUMBER 




1868 


007114 


001213 








.UORD 


MMUERR 




{ADDRESS OF ERROR MESSAGE 




1869 
















iNO GO 


TO ERROR 




1870 


007116 


022627 


000000 




7$: 


CMP 


CSP)*.<K) 


{IS STACK CORRECT 




1871 


007122 


001403 








BEQ 


8$ 




{YES GO ON 




1872 


007124 


104000 








ERROR 






{ALL ERRORS TO TRAP TO EMT 


VECTOR 


1873 


007126 


000150 








.UORD 


150 




{UNIQUE ERROR NUMBER 




1874 


007130 


001213 








.UORD 


MMUERR 




{ADDRESS OF ERROR MESSAGE 




1875 
















iNO GO 


TO ERROR 




1876 


007132 


022627 


177777 




8»: 


CMP 


(SP)». 0177777 




{IS STACK CORRECT 




1877 


007136 


001403 








BEQ 


9$ 




{YES GO ON 




1878 


007140 


104000 








ERROR 






{ALL ERRORS TO TRAP TO EMT 


VECTOR 


1879 


007142 


000151 








.UORD 


151 




{UNIQUE ERROR NUMBER 




1880 


007144 


001213 








.UORD 


MMUERR 




{ADDRESS OF ERROR MESSAGE 




1881 
















iNO GO 


TO ERROR 




1882 


007146 


012637 


000244 




91: 


MOV 


(SP)». 80244 




{RESTORE TEST LOCATION 




1883 






















1884 










• 













GtOBAl. AREAS MACUl 30A(10S2) ?0 MAR 04 11:51 ' 
KOJllA.nAC 20-nAR-84 11:19 TIO TEST 



1 AA^ 


WV f 








1 ^v^Yv ■ 






























1 1 


1888 














1889 


007152 








■ ^ ■ A A • 








OM967 


t 7lf>P6 






INC 


1891 


007156 


005037 


177572 








189^ 




00S0^7 


W A*^*C 






CLR 


1893 


007166 


012737 


140000 


177776 




Hov 


1894 


007174 


0106S7 


001070 

WAV • V 






now 


189S 


0072OO 


012737 

V Afc • * 


040000 


177776 




MOV 


1096 


007206 


010637 


001066 






MOV 


1897 


007212 

W • C Ab 


01P7S7 

V A& ■ «if ■ 


030000 


177776 




MOV 


1898 


007220 


004767 


172062 






JSR 


1699 


007224 


012737 
013*^46 


000027 


172516 




HOV 


1900 


007232 


000244 






MOV 


1901 


007236 


012746 


177777 






MOV 


1902 


007242 


012746 


120413 






MOV 


1903 


007246 


012737 


177777 


000244 




MOV 


1904 


007254 


012767 


077400 


170536 




MOV 


1905 


007262 


012705 


000244 






MOV 


1906 


007266 


005237 


177572 

A • ' ^ ■ C 






INC 


1907 


007272 


006625 








MTPI 


1908 


007274 


022757 


050010 


177776 




CHP 


1909 


007302 


001405 








BEO 


1910 


007S04 


104000 








ERROR 


1911 


007S06 


000152 








.MRO 


1912 


007510 


001213 

W AC A 








.UORD 


191S 














1914 


007312 




177572 




A V • 


CLR 


1915 


007316 


0127S7 

VAC » w • 


140OOO 

A^ WW 


177776 




MOV 


1916 


007S24 


0206S7 


OO1070 

WAV • V 






CMP 


1917 


007330 


001405 








BEQ 


1918 


007332 


104000 

A W ^VW 








ERROR 


1919 


007334 


000153 








.UORO 


1920 


007356 


001213 








.WORD 


1921 














1922 


007540 


012737 

VAC ( W f 


040000 

WW 


177776 


AW* • 


HOV 


1923 


007346 


020657 


001066 






CMP 


1924 


007352 


001403 








BEQ 


1925 


007354 


104000 








ERROR 


1926 


007356 


000154 










1927 


007360 


001213 








.UORO 


1928 












1929 


007362 


023727 


000244 


120413 




CMP 


1930 


007370 


001403 








BEQ 


1931 


007372 


104000 








ERROR 


1932 


007374 


000155 








.UORD 


1933 


007376 


001213 








iuQRO 


1934 












1935 


0C7400 


020327 


000246 




21: 


CMP 


1936 


007404 


001403 








BEQ 


1937 


007406 


104000 








ERROR 


1938 


007410 


000156 








.UORO 


1959 


007412 


001213 








.UORO 


1940 















£ 40 

PO (HOVE rPOM PREVIOUS DATA SPACE) 



SEQ O040 



TEST MTPI (MOVE TO PREVIOUS INSTRUCTION SPACE) 



«TESTN 

84177572 

SffLAG 

•140000.84177776 

R6.S4SAVUSE 

•40000,84177776 

R6.S4SAVSUP 

•30000. 8«177776 

PC.MMU 

•27, ©•I 72516 

8^244. (SP) 

•177777. (SP) 

•120413. (SP) 

•177777,84244 

•77400. UDPDRO 

•244. R 3 

84177572 

(R5)* 

•50010. 8^1 7 7776 
II 

152 

MMUERR 

8^177572 
•140000.84177776 
R6.84SAVUSE 
1001 

155 

MMUERR 

•40000.8417; 776 

R6.84SAVSUP 

2001 

154 

MMUERR 

84244. 41204 13 
2( 

155 

MMUERR 

R5.4246 
31 

156 

MM^tRR 



INCREMENT TEST NUMBER 

MMu orr 

CLEAR MMU ABORT FLAG 
POINT TO USER SPACE 
SAVE USER SP 

POINT TO SUPERVISOR SPACE 
SAVE SUPERVISOR SP 
SETUP PSU 
INIT MMU 
SETUP MMR3 

SAVE DATA AT TEST LOCATION 
PUT KNOUN DATA ON STACK 
PUT TEST DATA ON STACK 
PUT KNOUN DATA AT TEST LOCATION 
SETUP UOPORO TO ABORT 
SETUP POINTER TO TEST LOCATION 
TURN MMU ON 

TEST INSTRUCTION 
IS PSU CORRECT 
TES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS or ERROR MESSAGE 
I NO GO TO ERROR 

TURN MMU Off 
POINT TO USER SPACE 
IS USER SP CORRECT 
TES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 

POINT TO SUPERVISOR SPACE 
IS SUPERVISOR SP CORRECT 
TES CO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OE ERROR MESSAGE 
I NO GO TO ERROR 

IS TEST LOCATION CORRECT 
TES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS or ERROR MESSAGE 
I NO CO TO ERROR 

IS R5 CORRECT 
YES GO ON 

ALL ERRORS TO TRAP TO EMT vEC^')R 
UNIQUE ERROR NUMBER 
ADDRESS Of ERROR MESSAGE 
NO GO TO ERROR 



I'M! 


007414 


005057 


4 T T f -^d^ 




5» ; 


LLH 






A07 


1 777 77 








1 OAT 
































<Wt1 <%7 










t 
































ftl 37X7 




1 77 77#» 


4t • 


MOV 

1 www 




















n 1 3 7n 1 








HOV 


1 4S1 






I 7757P 

A ■ ' J ' C 






INC 


1 4^3 












MTPI 








WwWA A 


1 77776 




CMP 




























ERROR 






000160 








UORO 


1957 


007474 


00121S 

W AC 








.WORD 


















007476 


005037 


177572 




soot • 


CLR 






OPS 73 7 


000244 

VWC^^ 


A^ ^ AC A 




CMP 


^ TV A> 


0O7510 










BED 

WWW 


IMP 


00751P 


104000 








ERROR 




nn7*ii A 


WW Aw A 








UORO 




<V17^1 4« 
V/v r 










uonn 


IMS 














1466 






OOOP4A 




301 1 • 


CMP 


1967 




Vw A**V^ 








BED 


1968 












ERROR 


L969 


007SS6 


WV AwC 








UORD 


1970 


W r jO£ 


AA1 PI X 
























197P 


007S34 


AA*U)Y7 


1 7777A 




S021 • 


ri R 


1973 


007S40 


OP1l%P7 


177777 






CMP 


1974 


007544 










BEO 


1975 


007546 


Jt\^^VrwV 








ERROR 


1976 


007550 


vw A WW 








UORD 


1977 


007552 


WXC A^ 








UORD 


1978 














1979 


007554 


01P7S7 

V Ac 9 9 9 


ovnoi 7 


1 7 7 7 7<; 


xn4 1 ■ 


HOW 


1980 


007562 


VAC • "wV 


129347 






HOV 


1961 


007566 


V AC • V A 


00024I* 






HOV 


1962 


007572 


OOSPX7 

VV*i#C*> ' 


1 77^72 








1963 


007576 


WVw^ & 








MTPI 


1984 


007600 


OPP737 

VCC '99 




1 7 777A 




CHP 


1985 


007606 


0014O3 

W A^Vw 








RED 


1966 


007610 


104000 










1967 


007612 


000164 

VW A 










1966 


007614 


OOIPIS 

W AC A w 








UORD 


1969 














1990 


007616 


005037 


177572 




400$ : 


CLR 


1991 


007622 


023727 


000244 


12234 7 




CMP 


1992 


007630 


001403 








BEQ 


1995 


0076S2 


104000 








ERROR 


1994 


007634 


000165 








.WORD 


1995 


007636 


001213 








.UORD 


1996 















C4 



MOVf TO PREVIOUS INSTRUCTION SPACF ) 



SEQ O041 



8«177776 
(SP). •177777 
41 

157 

MMUERR 

•30017. 80177776 
•145121, (SP) 
•244. Rl 
S#l 77572 
( R * } 

•30011. S»177776 
300* 

160 

MMUERR 

8#177572 
8*244, •145121 
3011 

161 

MMUERR 

Rl.«244 
302* 

162 

MMUERR 

»«177776 
(SP). •177777 
S04I 

163 

MMUERR 

•SOOl7.8«177776 
•122347, (SP) 
•246. Rl 
8«177572 

(Rl) 
•30011. a*177776 
400t 

164 

MMUERR 

a«l 77572 

8«244.^122347 

4011 

165 

MMUERR 



I SET PSU TO KERNEL MODE 
IS KERNEL STACK CORRECT 
YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
lUNIQUE ERROR NUMBER 
J ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

I SETUP PSU 
[SETUP TEST DATA 
I SETUP Rl 
TURN MMU ON 
TEST INSTRUCTION 
IS PSU CORRECT 
YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
J ADDRESS 0^ ERROR MESSAGE 
I NO GO TO ERROR 

TURN MMU OFF 

IS TEST LOCATION CORRECT 
fYES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNI QUE ERROR NUMBER 
I ADDRESS Of ERROR MESSAGE 
(NO GO TO ERROR 

IS Rl CORRECT 
YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

I SET PSU TO KERNEL MODE 
IS STACK CORRECT 
YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
•.ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

I SETUP PSU 
I SETUP TEST DATA 
I SETUP Rl 
TURN MMU ON 
TEST INSTRUCTION 
IS PSU CORRECT 
YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
j ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

TURN MMU OFF 

IS TEST LOCATION CORRECT 
YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 



KOJllA.MAC 



20 MAR 84 11:19 



DA 



1^7 


007640 


020127 


000244 


1996 


007644 


001405 




1999 


007646 


104000 




2000 


007650 


000166 




2001 


007652 


001213 




2002 








2003 


007654 


0050S7 


177776 


2004 


007660 


021627 


177777 


2005 


007664 


001405 




2006 


007666 


104000 




2007 


007670 


000167 




2006 


007672 


001215 




2009 








2010 


007674 


005046 




2011 


007676 


005237 


177572 


2012 


007702 


006603 




201S 


007704 


022737 


000004 


2014 


007712 


001403 




2015 


007714 


104000 




2016 


007716 


000170 




2017 


007720 


001213 




2018 








2019 


007722 


005037 


177572 


2020 


007726 


020327 


000000 


2021 


007732 


001403 




2022 


007734 


104000 




2025 


007736 


000171 




2024 


007740 


001213 




2025 








2026 


007742 


022627 


177777 


2027 


007746 


001403 




2028 


007750 


104000 




2029 


007752 


000172 




2030 


007754 


001213 




2031 








2032 


007756 


012637 


000244 


2033 






2034 








2035 


007762 






2036 








2037 








2038 








2039 


007762 






2040 


007762 


005267 


171016 


2041 


007766 


005037 


177572 


2042 


007772 


005037 


001042 


2043 


007776 


012737 


140000 


2044 


010004 


010637 


001070 


2045 


010010 


012737 


040000 


2046 


010016 


010637 


001066 


2047 


010022 


012737 


030000 


2048 


010030 


004767 


171252 


2049 


010034 


012737 


000027 


2050 


010042 


013746 


000244 


2051 


010046 


012746 


177777 


2052 


010052 


012746 


100004 



?0 tWR 64 

TU 

401 «: 



402 <: 



11:31 PAGi 42 

TEST MTPI (MOVE TO PREVIOUS INSTRUCTION SPACE ) 



SEO n042 



4041: 



177776 



5«: 



6(: 



7«: 



CMP 


Rl.*244 






lis Rl CORRECT 


BEQ 


402t 






iTES GO ON 


ERROR 








lALL ERRORS TO TRAP TO EMT 


.WORD 


166 






i UNIQUE ERROR NUMBER 


.UORD 


MMUERR 






(ADDRESS OF ERROR MESSAGE 






iNO GO 


TO ERROR 


CLR 


80177776 






iSET PSU TO KERNEL MODE 


CMP 


(SP). #177777 






lis STACK CORRECT 


BEQ 


404 ( 






lYES GO ON 


ERROR 








lALL ERRORS TO TRAH TO EMT 


.UORD 


167 






ilMIQUE ERROR NUMBER 


.UORO 


MMUERR 






1 ADDRESS or ERROR MESSAGE 






sNO 


GO 


TO ERROR 


CLR 


(SP) 






iSETUP STACK FOR NEXT TEST 


INC 


8#177572 






iTURN MMU ON 


MTPI 


R3 






J TEST INSTRUCTION 


CMP 


•4. 80177776 






lis PSU CORRECT 


BEQ 


5» 






J YES GO ON 


ERROR 








|ALL ERRORS TO TRAP TO EMT 


.WORD 


170 






il^IQUE ERROR NUMBER 


.WORD 








1 ADDRESS Of ERROR MtSSAGE 






iNO 


GO 


TO ERROR 


CLR 


80177572 






iTURN MMU OFF 


CMP 


R3.00 






lis R3 CORRECT 


BEQ 


6( 






jYES GO ON 


ERROR 








lALL ERRORS TO TRAP TO EMT 


.UORD 


171 






i UNIQUE ERROR NUMBER 


.UORD 








t ADDRESS OF ERROR MESSAGE 






|N0 


GO 


TO ERROR 


CMP 


(SP)*.0177777 






lis STACK CORRECT 


BEQ 


7» 






J YES GO ON 


ERROR 








lALL ERRORS TO TRAP TO EMT 


.UORD 


172 






: UNIQUE ERROR NUMBER 


.UORD 


MMUERR 






i ADDRESS OF ERROR MESSAGE 






;N0 


GO 


TO ERROR 


MOV 


CSP)», 30244 






iRESTORE TEST LOCATION 



VECTOR 



VECTOR 



VECTOR 



VECTOR 



VECTOR 



177776 
177776 
177776 
172S16 



TSMM60: 
I -TEST 12 
TST12: 

INC 
CLR 
CLR 
MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MOV 
MOV 
MOV 
MOV 



TEST MTPD (MOVE TO PREVIOUS DATA SPACE) 



ITESTN 
8017 757? 
80FLAG 

0140000.80177776 
R6.80SAVUSE 
040000.80177776 
R6,80SAVSUP 
030000,80177776 
PC. MMU 
027.80172516 
80244, (SP) 
0177777. (SP) 
0100004, -(SP) 



I INCREMENT TEST NUMBER 
,MMU OFF 

I CLEAR MMU ABORT FLAG 
J POINT TO USER SPACE 
I SAVE USER SP 

I POINT TO SUPERVISOR SPACE 
I SAVE SUPERVISOR SP 
I SETUP PSU 
lINIT MMU 
I SETUP MMR3 

I SAVE DATA AT TEST LOCATION 
I PUT KNOUN DATA ON STACK 
(PUT TEST DATA ON STACK 
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^053 


010056 


012737 


177777 


000244 




hOV 


2054 


010064 


012/67 


077400 


167506 




MOV 


2055 


010072 


012703 


000244 






MOV 


2056 


010076 


0052S7 


177572 






INC 


2057 


010102 


10662S 








MTPO 


20Sa 


010104 


0227S7 


030010 


177776 




CMP 


2059 


010112 


001403 








BEQ 


2060 


010114 


104000 








ERROR 


2061 


010116 


000173 








.WORD 


2062 


01C120 


001213 








.WORD 


2063 














2064 


010122 


005037 


177572 




IS: 


CLR 


2065 


010126 


012737 


140000 


177776 




MOV 


2066 


010134 


020637 


001070 






CMP 


2067 


010140 


001403 








BEQ 


2068 


010142 


104000 








ERROR 


2069 


010144 


000174 








.WORD 


2070 


010146 


001213 








.WORD 


2071 














2072 


010150 


012737 


040000 


177776 


100>: 


MOV 


2073 


010156 


020637 


001066 






CMP 


2074 


010162 


001403 








BEQ 


2075 


010164 


104000 








ERROR 


2076 


010166 


000175 








.WORD 


2077 


010170 


001213 








.UORD 


2078 














2079 


010172 


023727 


000244 


100004 


200(: 


CMP 


2080 


010200 


001405 








BEQ 


2081 


010202 


104000 








ERROR 


2082 


010204 


000176 








.WORD 


2085 


010206 


001213 








.WORD 


2084 














2085 


010210 


020327 


000246 




2»: 


CMP 


2086 


010214 


001403 








BEQ 


2087 


010216 


104000 








ERROR 


2088 


010220 


000177 








.WORD 


2089 


010222 


001215 








.UORD 


2090 














2091 


010224 


005057 


177776 




3»: 


CLR 


2092 


010230 


021627 


177777 






CMP 


2093 


010234 


001405 








BEQ 


2094 


010236 


104000 








ERROR 


2095 


010240 


000200 








.UORO 


2096 


010242 


001213 








.UORD 


2097 












2098 


010244 


012737 


030017 


177776 


41: 


MOV 


2099 


010252 


012746 


100737 






MOV 


2100 


010256 


012701 


000244 






MOV 


2101 


010262 


005237 


177572 






INC 


2102 


010266 


106611 








MTPD 


2103 


010270 


022737 


030011 


177776 




CMP 


2104 


010276 


001403 








BEQ 


2105 


010300 


104000 








ERROR 


2106 


010302 


000201 








.WORD 


2107 


010304 


001213 








.UORO 


2108 















[ 4 



PO (MOVE TO PREVIOUS DATA SPACE) 



•17777 7.8«244 
•77400. UIPORO 
•244. R 3 

8«1775-'2 
(R3). 

«30010. 8*177776 
It 

173 

MMUERR 

a#177572 

#140000. a«l 77776 
R6.8*SAVLfSE 
100 » 

174 

MMUERR 

♦40000, »♦ 17 77 76 

R6,8#SAVSl»' 

200$ 

175 

MMUERR 

8«244.« 100004 
2» 

176 

MMUERR 

R3.«246 
3t 

177 

MMUERR 

8*177776 

(SP).«177777 

4$ 

200 
MMUERR 

•30017.8*177776 

*100737, -(SP) 

*244.R1 

8*177572 

(Rl) 

*3001l. 8*177776 
300« 

201 

MMUERR 



iPUT KNOWN DATA AT TEST LOCATION 

I SETUP UIPDRO TO ABORT 

I SETUP POINTER TO TEST LOCATION 

I TURN MMU ON 

I TEST INSTRUCTION 

J IS PSU CORRECT 

I YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

(TURN MMU OFF 
(POINT TO USER SPACE 
(IS USER SP CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
; NO GO TO ERROR 

(POINT TO SUPERVISOR SPACE 
;IS SUPERVISOR SP CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(IS TEST LOCATION CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

(IS R5 CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(SET PSU TO KERNEL MODE 
J IS KERNEL STACK CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 

(SETUP PSU 
(SETUP TEST DATA 
(SETUP Rl 
(TURN MMU ON 
(TEST INSTRUCTION 
(IS PSU CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 



GLOBAL ARtAS riACtll S0A(1052) ?0 MAR 64 11:31 I 
KOJUA.MAC 20 riAR 84 11:19 T12 TEST 



2109 


010306 


005037 


177572 




300»: 


CLR 


2110 


010312 


02S727 


000244 


100737 




CMP 


2111 


010320 


001403 








BEQ 


2112 


010322 


104000 








ERROR 


2113 


010324 


000202 








.UORO 


2114 


010526 


001213 








.UORO 


2115 














2116 


010330 


020127 


000244 




301 >: 


CMP 


2117 


010334 


001403 








BEQ 


2118 


010336 


104000 








ERROR 


211<» 


010340 


000203 








.WORD 


2120 


010342 


001213 








.UORO 


2121 














2122 


010344 


005037 


177776 




302 1: 


CLR 


2123 


010350 


021627 


177777 






CMP 


2124 


010354 


001405 








BEQ 


2125 


0103:^6 


104000 








ERROR 


2126 


010360 


000204 








.WORD 


2127 


010362 


001213 








.WORD 


2128 














2129 


010364 


012737 


050017 


177776 


304<: 


MOV 


2130 


010372 


012746 


156711 






MOV 


2131 


010376 


012701 


000246 






MOV 


2132 


010402 


005237 


177572 






INC 


2133 


010406 


106641 








MTPO 


2134 


010410 


022737 


030011 


177776 




CMP 


2135 


010416 


001403 








BEQ 


2136 


010420 


104000 








ERROR 


2137 


010422 


000205 








.UORO 


2138 


010424 


001213 








.UORO 


2139 














2140 


010426 


005037 


177572 




400t: 


CLR 


2141 


010432 


023727 


000244 


156711 




CMP 


2142 


010440 


001403 








BEQ 


2143 


010442 


104000 








ERROR 


2144 


010444 


000206 








.WORD 


2145 


010446 


001213 








.WORD 


2146 














2147 


010450 


020127 


000244 




4011: 


CMP 


2148 


010454 


001403 








BEQ 


2149 


010456 


104000 








ERROR 


2150 


010460 


000207 








.UORO 


2151 


010462 


001213 








.UORO 


2152 














2153 


010464 


005037 


177776 




402 <: 


CLR 


2154 


010470 


021627 


177777 






CMP 


2155 


010474 


001403 








BEQ 


2156 


010476 


104000 








ERROR 


2157 


010500 


000210 








.UORO 


2158 


010502 


001213 








.UORO 


2159 














2160 


010504 


005046 






4041: 


CLR 


2161 


010506 


005237 


177572 






INC 


2162 


010512 


106603 








MTPD 


2163 


010514 


022737 


000004 


177776 




CMP 


2164 


010522 


001403 








BEQ 



F4 

E 44 

PO CMOVE TO PREVIOUS DATA SPACE) 



iEQ 0044 



WI177572 
M244. •100737 
301* 

202 
MMUERR 

Rl,#244 

302 1 

203 
MHUERR 

a«177776 
(SP). #177777 
304$ 

204 

MMUERR 

030017. a«l-'7776 
♦156711, -fSP) 
•246. Rl 
a«177572 

(Rl) 
#50011, WH77776 
4001 

205 

8#177572 
84244. #156711 
401$ 

206 

MMUERR 

Rl,«244 
4021 

207 

MMUERR 

a#177776 
CSP). #177777 
404$ 

210 

MMUERR 

-CSP) 

0#17757? 

R3 

♦4,a#l77776 
5» 



I TURN MMU or*" 

lis TEST LOCATION CORRECT 

I YES GO ON 

{ALL ERRORS TO TRAP (0 EMT VECTOR 
I UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 

{IS Rl CORRECT 
I YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
{ADDRESS or ERROR MESSAGE 
iNO GO TO ERROR 

{SET PSW TO KERNEL MODE 
{IS STACK CORRECT 
{YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
|N0 GO TO ERROR 

{SETUP PSW 
(SETUP TEST DATA 
{SETUP Rl 
(TURN MMU ON 
{TEST INSTRUCTION 
(IS PSU CORRECT 
{YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

{TURN MMU OFF 

(IS TEST LOCATION CORRECT 

(YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

{IS Rl CORRECT 
{YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
:N0 GO TO ERROR 

(SET PSW TO KERNEL MODE 
(IS STACK CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(SETUP STACK FOR NEXT TEST 

(TURN MMU ON 

( TEST INSTRUCTION 

{IS PSU CORRECT 

(YES GO ON 



(jLOBAi. ARfcAb 
KOJllA.MAC 



MACrll 50A(105^) 
20 MAR 84 11:19 



20 MAR 6A 

T12 



Hi 



G4 



MOVE TO PREVIOUS DATA SPACE) 



StO O045 



2165 


010524 


104000 








ERROR 






lALL ERRORS TO TRAP TO EMT VECTOR 


2166 


010526 


000211 








.WORD 


211 




i UNIQUE ERROR NUMBER 


2167 


010530 


001215 








.WORD 


MMUERR 




I ADDRESS or ERROR MESSAGE 


2166 














iNO 


GO 


TO ERROR 


2169 


010532 


005037 


177572 




5»: 


CLR 


80177572 




I TURN MMU OFF 


2170 


010536 


020327 


000000 






CMP 


R3.00 




J IS R3 CORRECT 


2171 


010542 


001403 








BEQ 


bt 




(YES GO ON 


2172 


010544 


104000 








ERROR 






;ALL ERRORS TO TRAP TO EMT VECTOR 


2173 


010546 


000212 








.UORO 


212 




(UNIQUE ERROR NUMBER 


2174 


010550 


001213 








.WORD 


MMUERR 




1 ADDRESS OF ERROR MESSAGE 


2175 














(NO 


GO 


TO ERROR 


2176 


010552 


02262 7 


177777 




6*: 


CMP 


CSP)». ♦177777 




;IS STACK CORRECT 


2177 


010556 


001403 








BEQ 


7$ 




J YES GO ON 


21 7« 


010560 


104000 








ERROR 






;ALL ERRORS TO TRAP TO EMT VECTOR 


2179 


010562 


000213 








.UORO 


213 




i UNIQUE ERROR NUMBER 


2180 


010564 


001213 








.WORD 


MMUERR 




s ADDRESS OF ERROR MESSAGE 


2181 














sNO 


GO 


TO ERROR 


2162 


010566 


012637 


000244 




It'. 


MOV 


(SP)».S«244 




s RESTORE TEST LOCATION 


2183 




















2184 










• 

TSMriU7: 










2185 


010572 
















2186 




















2187 










;»TEST 


13 


TEST NON -RESIDENT ABORT 


2168 










TST13: 










2189 


010572 
















2190 


010572 


005267 


170206 






INC 


*TESTN 




J INCREMENT TEST NUMBER 


2191 


010576 


005037 


177572 






CLR 


8*177572 




sMMU OTF 


2192 


010602 


005067 


170234 






CLR 


CI ilf* 






2193 


010606 


013746 


000214 






MOV 


fiM»214.-CSP) 




J SAVE DATA AT TEST LOCATIONS 


2194 


010612 


013746 


000216 






MOV 


8#216,-(SP) 






2195 


010616 


005067 


170250 






CLR 


SAVMRO 




s CLEAR STATUS REGS SAVE AREAS 


2196 


010622 


005067 


170246 






CLR 


SAVMRl 






2197 


010626 


005067 


170244 






CLR 


SAVMR2 






2198 


010632 


004767 


170450 






JSR 


PC.MMU 




ilNIT MMU 


2199 


010636 


012737 


030000 


177776 




MOV 


♦30000. 8«1 77776 




: SETUP PSW 


2200 


010644 


012702 


000200 






MOV 


♦200. R2 






2201 


010650 


012737 


077400 


177600 




MOV 


♦77400, 8*177600 




J SETUP FOR AN ABORT 


2202 


010656 


004767 


000164 






JSR 


PC,TS7 




1 CAUSE AN ABORT TO OCCUR AND 


2203 


















:TMEN CHECK IF ABORT FLAG REGISTERED 


2204 


















sTHlS EVENT AND CHECK IF STATUS REGS 


2205 


















! CONTAINED EXPECTED VALUES. 


2206 


















:IF NO ABORT OCCURRED THEN GO TO ERROR 


2207 


















t OTHERWISE CONTINUE. 


2208 


010662 


012737 


077404 


177600 




MOV 


♦77404, S^l 77600 




i SETUP FOR AN ABORT 


2209 


010670 


004767 


000152 






JSR 


PC,TS7 




•.CAUSE AN ABORT TO OCCUR AND 


2210 
















»THEN CHECK IF ABORT FLAG REGISTERED 


2211 


















J THIS EVENT AND CHECK IF STATUS REGS 


2212 


















t CONTAINED EXPECTED VALUES. 


2213 


















iIF NO ABORT OCCURRED THEN GO TO ERROR 


2214 


















iOTHERUISE CONTINUE. 


2213 


010674 


012701 


000220 






MOV 


♦220, Rl 






2216 


010700 


004767 


170402 






JSR 


PC.MMU 




jINIT MMU 


2217 


010704 


005003 








CLR 


R5 




J SETUP MMRl EXPECTED DATA 


2218 


010706 


012767 


000001 


170126 




MOV 


♦I, FLAG 




t SETUP FLAG FOR AN ABORT 


2219 


010714 


012737 


000001 


177572 




MOV 


♦I, 8^1775 72 




iTURN MMU ON 


2220 


010722 


012737 


100000 


177776 




MOV 


♦100000, 8*177776 




J SETUP PSW FOR AN ABORT CILLEGAl »lOOfe "» 



GLOBAi AREAS 
KOJllA.MAC 



MACtll 30A(10b2) 
PO-MAR 84 11:19 



?0 KAR^^^ 



11: 



lOENT ABORT 



SEO O046 



2221 


010730 


012241 




2P22 


010732 


004767 


AAAOii A 

000240 


2221 








222* 








22 2o 








222b 


010736 


005067 


170130 


2227 


010742 


AAC A^ 7 

003067 


4 7A4 O^ 

170126 


2226 


010746 


005067 


170124 


2229 


010752 


A • ^ A V 

012703 


AAAAO O 

000022 


2250 


010756 


012767 


AA AAA 4 

000001 


2231 


010764 


A 4 TV T 

012757 


AAAAA4 

OOOOOl 


22 S2 


010772 


A 4 ^ V Y 

012737 


AOAAAA 

0200OO 


2255 


011000 


AA£ COO 

006522 




2254 


011002 


AAil 7f 7 

004767 


AAA4 7A 

000170 


2255 








2236 








2257 








2290 


011006 


Al 07^7 

012/ 3f 


A VAAAA 


2239 


A4 4 A 4 Jl 

011014 


At 07*7 

012797 


O f f 4UU 




A « 4 A 

011022 


00303 / 


4 7*7C7^ 
If f3f2 


22*1 


A f t A ^£ 

011026 


AAJLCOO 

006322 




22*2 


011030 


012603 




2243 


Af « AV^ 

011092 


A 4 W ^ 

012657 


AAAO 4 £ 

000216 


2244 


At t AV£ 

011036 


A 4 0£ V T 

012657 


AAAO 4 M 

000214 


2243 








224o 


/\ • • Ail ^ 

011042 


AAA 4 £ ^ 

000167 


AAA04 A 

000210 


224 7 








2240 








2249 








2230 


A 4 4 AJI ^ 

011046 


A 4 ^£ ^ 

012767 


AAAAA 4 

OOOOOl 


2231 


A 4 4 ACil 


A 4 V ^ 

012797 


AAAAA 4 

OOOOOl 


2232 


4 A^ ^ 


A 4 A7A 4 

010701 




2233 


A4 4 A£ Jl 

011064 


AA£ COO 

006522 




2234 


A 4 4 A^ £ 

01 1066 


022767 


AAAAA A 

000000 


cc33 


All ATil 

Olio r4 


AA4 AAV 

001403 




cc3o 


A 1 4 A "T^. 

Olio 7o 


4 AJI AAA 

104000 




223 ' 


A1 t 4 AA 

OlllOO 


AAAO 4 il 

000214 




ce3i9 


A4 4 4 AO 

011102 


AA 4 O 4 V 

001213 




ce37 










A4 4 4 Ail 

011104 


4 AC A£ ^ 

105067 


167762 


22oI 


A4 4 4 4 A 

Oil no 


AOO ^ 

022 76 7 


4 AAAAA 

100000 


CCDC 


A4 4 4 

O I 1 I Xo 


AAl ilAV 

001403 






A4 4 4 OA 


4 Ail AAA 

104000 




ccO*» 


A1 1 1 


AAAO 1 C 

OOOcIj 




£eo3 


A 4 4 4 

011124 


A A 4 *> 4 V 

001213 




2200 








ceo r 


A1 1 1 OiL 


A O^ "7 O "7 

02672 7 


4 £ O 

167742 




A1 1 1 VJi 

on 


AA 4 A AV 

001405 




CC07 


A1 1 4 

Ol 113o 


4 Ail AAA 

1O4OO0 




OD7A 


A 4 4 4 i|A 
Oil I1U 


AAAOl 

OUOclO 




3271 








2272 








2273 


011144 


026701 


167726 


2274 


011150 


001403 




2275 


011152 


104000 




2276 


011154 


000217 





170056 
177572 
177776 



177776 
177600 



MOV CR2)». (Rl) 

JSR PC.TSM7 



CLR SAVMRO 

CLR SAVMRl 

CLR SAVMR2 

MOV «22. R3 

MOV •l.fLAG 

MOV ♦1.8^177572 

MOV #20000. S4H77776 

MFPI (R2)» 

JSR PC.TSM7 



MOV «30000.a#177776 

MOV #77400. a«177600 

CLR a#177572 

MFPI (R2)» 

MOV (SP)»,R3 

MOV (SP)».a#216 

MOV (SP)».SI*214 



(CAUSE AN ABORT 

t CHECK IF AN ABORT OCCURRED Br 
(CHECKING ABORT TLAG AND STATUS REGS 
iir NO aBORT OCCURRED THEN GO TO ERROR 
lOTHERUISE CONTINUE. 
(CLEAR STATUS REGS SAVE AREAS 



SETUP MMRl EXPECTED DATA 
SETUP FLAG FOR AN ABORT 
TURN MMU ON 

SETUP PSW FOR AN ABORT (ILLEGAL MODE) 
CAUSE AN ABORT 

CHECK IF AN ABORT OCCURRED Br 

CHECKING ABORT FLAG AND STATUS REGS 

IF NO ABORT OCCURRED THEN GO TO ERROR 

OTHERWISE CONTINUE. 

SETUP PSW 

SETUP FOR AN ABORT 

MMU OFF 

TRY TO CAUSE AN ABORT 
POP TfC STACK 

RESTORE DATA AT TEST LOCATIONS 



167766 
177572 



167746 



167754 



000022 





JMP 


TS7FIN 




(ROUTINE TO CAUSE AND CHECK NONRESIDENT 


ABORTS 


TS7: 


MOV 


#1,FLAG 


(SETUP FOR AN ABORT 




MOV 


#1.8#177572 


(TURN MMU ON 




MOV 


R7.R1 


(SAVE PC 




MFPI 


CR2)» 


(CAUSE AN ABORT 




CMP 


#O.FLAG 


(DID AN ABORT OCCUR 




BEQ 


0K7 


(IF YES GO ON 




ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 




.WORD 


214 


(UNIQUE ERROR NUMBER 




.WORD 


MMUERR 


(ADDRESS OF ERROR MESSAGE 






sIF NO GO TO ERROR 


0K7: 


CLR6 


SAVMRO 


(SETUP EXPECTED DATA 




CMP 


#100000, SAVMRO 


( TEST MMRO FOR EXPECTED VALUE 




BEQ 


0KA7 


(IF OK THEN CONTINUE 




ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 




.WORD 


215 


(UNIQUE ERROR NUMBER 




.WORD 


MMUERR 


(ADDRESS OF ERROR MESSAGE 






sNOT OK 


THEN GO TO ERROR 


0KA7: 


CMP 


SAVMRl, #22 


{ TEST MMRl FOR EXPECTED VALUE 




BEQ 


OKAY 7 


(IF OK THEN CONTINUE 




ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 




.WORD 


216 


(UNIQUE ERROR NUMBER 




.WORD 


MMUERR 


(ADDRESS OF ERROR MESSAGE 






(NOT OK 


THEN GO TO ERROR 


0KAr7: 


CMP 


SAVMR2.R1 


( TEST MMR2 FOR EXPECTED VALL€ 




BEQ 


0KAY7A 


(IF OK THEN CONTINUE 




ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 




.WORD 


217 


(UNIQUE ERROR NUMBER 



GLOBAL AREAS 
KOJllA.MAC 



HACUl 50A(1052) 
20 -MAR 84 11:19 



?0 HAR 64 
T15 



11: 



47 

RESIDENT ABORT 



SEO no47 



d& 1 1 


oil 130 


AA1 34 X 














UllloO 




1^7 7AJL. 
XO ' ' W> 




Olllo4 




XO ' 1 






ftft^/WL7 


1^7 7A3 




Mill (M 






3 3AZ 








33fl^ 
cco4 


















ftl 1 1 


ft337*>7 


nnftftftft 


33A7 
CCO ' 


ftl 1 3/\A 


AA1 A AX 




3 3a A 


All 3A4^ 


1 AAAAA 






ftl 1 3t ft 


ftftft33ft 




33^^ 


A1 1 31 3 


ftfti 31 X 




3301 








3 303 


ftl 1 3 1 A 


ft437X7 


ftAftX77 




ftl 1 3T»3 


ft337#i7 

VCC 'Of 


1 ftftftftft 




ftl 1 3Xft 


ftfti AftX 






ftl 1 3X3 


1 ftAftftft 






ftl 1 


ftftft331 




33Q7 


ftl 1 3XA 
vlXc30 


ftftl 31 X 




33oa 








33QQ 


ftl 1 3Aft 


ft3ftX/i7 


1 A7*Xft 
XO fOO%J 


3Xftrt 


ftl 1 3AA 


ftftl AftX 






ftl 1 3AA 


1 AAftftft 






All 3CA 


ftAA333 






All 3C3 


AA1 3f X 














A1 1 3eA 


AAA oft 7 




3X<V% 










ftl 1 3^i^ 






3xmi 


nil 






3XnQ 








ft 








Pit 1 








c:«yxc 


ftl 1 3*>^ 








Aft 36^ 


ftft^3^7 


1 &7^33 
XO fOcc 




ftl 1 3A3 


ftft^ftX7 


1 77^73 




ft 1 1 3AI« 


Oft^ftf\7 


1 4^ 7^^ft 
XO ' 


C 


ftl 1 373 


ft 1 X lAls. 
VXO f 


ftftft3AA 


SXl 7 

Cw X f 


ftl 1 3 7A 


ftl X7AA 
%Jl^ r^O 


A/V>3Ai^ 
0\/Uc*0 




ftl 1 XA9 


nft^ftA7 


lO I jO** 


C JX 7 


ftt 1 XOI« 


OftSA<^7 


1 #^7^3 
XO fjO^ 




ftl 1 XI 3 


ftft^A4v7 


1 <^7CiAft 
XO r 30U 




Ot 1 XI A 


ftAA7&7 
f O f 


XO f r O* 




ftl 1 X9P 


ftl 37X7 
VXc ' J f 


ftXftftftft 




01 1 xxo 

VX XO 


ftl 37ft3 
V Xc f Uc 


ftftftSAA 




Ol 1X34 

VX Xd<9*t 


0137X7 
WXC 'Or 


ft77Aft3 




01 t XdP 

VX X^"*c 


ftl 37AA 
vXC ' ■•O 


ftftft3AA 




ni 1 XA& 

VX Xd^D 


ftl 37*7 


ftftftftftl 


2327 




ftl 37X7 


www X 


232S 


011362 


010701 




2329 


011364 


006622 




2330 


011366 


022767 


000000 


2331 


011374 


001403 




2332 









167636 TSM7: 



001072 
167642 



TSriA: 



TSMBs 



TSMC: 

TS7FIN: 
TSMMU8: 



.WORD 


MMUERR 






(ADDRESS OF ERROR MESSAGE 






jNOT 


OK 


THEN GO TO ERROR 


CLR 


SAVMRO 






(CLEAR STATUS REGS SAVE AREAS 


CLR 


SAVMRl 






I 


CLR 


SAVMR2 








RTS 


PC 






Ire TURN 


TO CHECK IF A NONRESIDENT ABORT OCCURRED 


CMP 


•O.FLAG 






.DID AN ABORT OCCUR 


BEQ 


TSMA 






tIF YES GO ON 


ERROR 








(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


220 






(UNIQUE ERROR NUMBER 


.WORD 


MMUERR 






(ADDRESS OF ERROR MESSAGE 






I IF 


NO 


THEN GO TO ERROR 


BIC 


*40377 , aOSAVMRO 






(SETUP EXPECTED DATA 


CMP 


4100000. SAVMRO 






; TEST MMRO FOR EXPECTED VALUE 


BEQ 


TSMB 






(IF OK THEN CONTINUE 


ERROR 








(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


221 






(UNIQUE ERROR NUMBER 


.WORD 


MMUERR 






(ADDRESS OF ERROR MESSAGE 






iV 


NO 


THEN GO TO ERROR 


CMP 


R3. SAVMRl 




: TEST MMRl FOR EXPECTED VALUE 


BEQ 


TSMC 






(IF OK THEN CONTINUE 


ERROR 








(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


222 






(UNIQUE ERROR NUMBER 


.WORD 


MMUERR 






(ADDRESS OF ERROR MESSAGE 






!IF 


NOT 


OK THEN GO TO ERROR 


RTS 


PC 






(RETURN 



t 



(♦TEST 

: 

TST14: 



14 



TEST READ ONLY ABORTS 



177776 
177600 

167466 

177572 

167446 



INC »TESTN 

CLR 84177572 

CLR FLAG 

MOV 3*244. (SP) 

MOV 34246, (SP) 

CLR SAVMRO 

CLR SAVMRl 

CLR SAVMR2 

JSR PC.MMU 

MOV 430000.34177776 

MOV #244. R2 

MOV 477402.84177600 

MOV 4246. (SP) 

MOV 41. FLAG 

MOV 41.34177572 

MOV R7.R1 

MTPI (R2)» 

CMP 40. FLAG 

BEQ It 



INCREMENT TEST NUMBER 
MMU OFF 

CLEAR MMU ABORT FLAG 

SAVE DATA AT TEST LOCATIONS 

CLEAR STATUS REGS SAVE AREAS 



INIT MMU 
I SETUP PSW 

t SETUP FOR AN ABORT 

iPUSH DATA ONTO THE STACK 

(SETUP FLAG FOR AN ABORT 

(TURN MMU ON 

I SAVE PC 

I CAUSE ABORT 

tOIO ABORT OCCUR 

I IF YES THEN GO ON 

(IF NO THEN GO TO ERROR 



GLCBAl areas NACUl 30A(10S2) ^0 HAR 94 11:51 I 
KDJllA.MAC 20-MAR-84 11:19 T14 TEST 



2555 


011576 


104000 








ERROR 


2554 


011400 


000223 








.WORD 


2555 


011402 


001213 








.UORD 


2336 


011404 


105067 


167462 




1»: 


CLRB 


2557 


011410 


022767 


020000 


167454 




CMP 


2356 


011416 


001403 








BEQ 


2339 














2540 


011420 


104000 








ERROR 


2341 


011422 


000224 








.WORD 


2342 


011424 


001213 








.UORO 


2343 


011426 


022767 


011026 


167440 


2»: 


CMP 


2344 


011434 


001403 








BEQ 


2345 














2346 


011436 


104000 








ERROR 


2347 


011440 


000225 








.UORO 


2348 


011442 


001213 








.UORD 


2349 


011444 


020167 


167426 




3$: 


CMP 


2550 


011450 


001405 








BEQ 


2351 














2352 


011452 


104000 








ERROR 


2553 


011454 


000226 








.UORD 


2554 


011456 


001215 








.UORD 


2555 


011460 


023766 


000244 


000002 


4$: 


CMP 


2556 


011466 


001403 








BEU 


2557 














2558 














2559 


011470 


104000 








ERROR 


2560 


0114 72 


000227 








.UORD 


2561 


011474 


001213 








.UORD 


2362 


011476 


012757 


030000 


177776 


5»: 


MOV 


2365 


011504 


012746 


000002 






MOV 


2364 


011510 


006622 








MTPI 


2565 


011512 


012637 


000246 






MOV 


2566 


011516 


012637 


000244 






MOV 


2367 














2568 


011522 








TSMriU9: 




2369 














2570 










J* TEST 


15 


2371 










TST15: 




2372 


011522 










2373 


011522 


005267 


167256 






IHC 


2374 


011526 


005037 


177572 






CLR 


2375 


011532 


005067 


167504 






CLR 


2376 


011536 


005067 


167550 






CLR 


2377 


011542 


005067 


167526 






CLR 


27 


011546 


005067 


167524 






CLR 


2379 


011552 


012737 


050000 


177776 




MOV 


2380 


011560 


004767 


167522 






JSR 


2381 


011564 


012703 


012072 






MOV 


2382 


011570 


012701 


012144 






MOV 


2383 


011574 


012702 


012214 






MOV 


2384 


011600 


012737 


000026 


172516 




MOV 


2585 


011606 


004767 


000050 






JSR 


2586 














2587 














2388 















..4 

E 48 

AD ONLT ABORTS 



OEQ 0046 



223 
SAVMRO 

020000. SAVMRO 
2* 



224 

MMUERR 

011026.SAVMR1 
3» 



225 
MMOERR 
R1.SAVMR2 
4$ 



226 

MMUERR 

8«244.2(SP) 

5t 



227 

MMUERR 

•30000. a«l 7 77 76 

•2.-(SP) 

(R2)» 

(SP)». 8*246 
CSP)*.9«244 



I ALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUM3ER 
(ADDRESS OF ERROR MESSAGE 
J SETUP EXPECTED DATA 
» TEST MMRO FOR EXPECTED VALUE 
ilF OK THEN CONTINUE 
jOTHERUISE go TO ERROR 
J ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
, TEST MMRl FOR EXPECTED VALUE 
;IF OK THEN CONTINUE 
tOTHERUISE GO TO ERROR 
J ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

TEST MMR2 FOR EXPECTED VALUE 
IF OK THEN CONTINUE 
OTHERUISE GO TO ERROR 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
CHECK THAT ABORT BLOCKED URITE 
BRANCH IF CURRENT CONTENTS' SAVED 
ELSE 

ERROR! ABORT DIDN'T BLOCK ACCESS 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
SETUP PSW 

PUSH DATA ONTO STACK 
TRY TO CAUSE ABORT 
RESTORE DATA AT TEST LOCATIONS 



TEST PAGE LENGTH ERROR ABORTS 



ITESTN 

M177572 

FLAG 

SAVMRO 

SAVMRl 

SAVMR2 

•50000. a«l 7 77 76 

PC.MMU 

•PLF0,R3 

96N0.R1 

•AB0RT0.R2 

•26. 8« 1725 16 

PC.TSM9 



; INCREMENT TEST NUMBER 
jMMU OFF 

(CLEAR MMU ABORT FLAG 

(CLEAR STATUS REGS SAVE AREAS 



(SETUP PSW 
(INIT MMU 

(LET R3. Rl. AND R2 POINT TO THE 
tUPWARO EXPANSION TABLES 

(DISABLE USER DATA SPACE 
(TURN MMU ON 

(00 RELOCATIONS FOR THE DIFFERENT 
(VALUES OF THE PAGE LENGTH FIELD AND 
(BLOCK NUMBER. IF AN ABORT OCCURS 



GLOBAL ARfAS 
KOJllA.MAC 



HAC>ll S0A(1052) 
20 HAR 84 11:19 



20 HAR 84 11: SI PAGE 49 

T15 TEST PAGE LEh4GTH ERROR ABORTS 



SEO O049 



2589 








2590 








2391 








2392 


011612 


012703 


012264 


2393 


011616 


012701 


012334 


2394 


011622 


012702 


Aa '>AA'^ 

012402 


2395 


011626 


004767 


AAAA V A 

000050 


2396 








2397 








2398 








2399 








2400 








2401 








2402 


011632 


AACAS T 

005037 


4 TTC 70 

I f f 5 f 2 


2403 


A4 4 £ 

011636 


A 4 '^'VAV 

012703 


Al 007A 

0122 #4 


2404 


011642 


A 4 0 7A4 

012701 


Al OVAA 

012344 


Oil AC 




Af 1 XT 7 


1 1 row 


2406 


011652 


AA£0 4 

OOod21 




2407 


A4 1 £ C il 

011654 


012o05 




2408 








2409 


011656 


AAA 4 £ T 

0001d7 


AAAC££ 

000366 


2410 








2411 








2412 








2413 


011662 


A4 7 

012337 


177600 


2414 


011666 


A 4 A4 AA 
010100 




Oil 4 C 

2415 


A4 4 ^ 

011670 


A 4 f 

012767 


AAAAAf 

OOOOOl 


2416 


011676 


012757 


AAAAA4 

OOOOOl 


2417 


A4 4 ^Aii 

011704 


A 4 A^Aii 

010704 




24 IB 


011706 


AA^C VA 

006530 




Oil 1 Q 

2419 


011710 


A04 '^^^ 

021227 


AAAAAA 

000000 


Oil OA 

2420 


A4 4 ? 4 ii 

011714 


001011 




Oil O 1 

2421 


011716 


A 4 AC 

012605 




2422 


011720 


022767 


AAAAA4 

OOOOOl 


OA OV 




AA 4 A AS 

001405 




Oil OA 

2424 


A4 4 

01 I 750 


4 AJI AAA 

104000 






01I79d 


000250 




2426 


011754 


AA 4 '^4 V 

001215 




OAOT 

242 7 








Oil OQ 

2428 


A 4 4 7 S£ 

011736 


A/\Aik VC 

000455 




Oil oo 
2429 


A 4 4 ^ A A 

011740 


022767 


AAAAAA 

OOOOOO 


2430 


A4 4 TJI^ 

011746 


AA 4 il AT 

001405 




OA T1 

2431 


A4 1 ^CA 

011750 


1 f\A AA/\ 

104000 




2H32 


A1 1 "TC^ 

Oil f d2 


OOU231 




OA 

CH33 


A4 4 

oil 


001213 




Oil tA 

2434 








OAXC 
2*33 


Oil f 5o 


10306' 


167110 


OA 

2436 


All 

O117o2 


022767 


040000 


OA ■¥ 7 

243 f 


All 7 7A 

0117 rO 


A/\< AAV 

001403 




OA <fl 


Oil / 72 


104000 






Al 1 77A 






2440 


011776 


001213 




2441 








2442 


012000 


022767 


000020 


2443 


012006 


001403 




2444 


012010 


104000 





MOV 
MOV 
MOV 
J5R 



♦PLF1.R5 
«6N1.R1 
dABORTl.RP 
PC.TSM9 



TSM9: 



167144 
177572 



167114 



167074 



167102 



1»: 
2*: 



3«! 



167066 4$; 



CLR 


S4177572 


MOV 


4PLF1*10.R3 


MOV 


4BN1*10.R1 


MOV 


(R3). 34177600 


MFPI 


(Rl)» 


MOV 


(SP)»,R5 


JMP 


TS9FIN 


: TO CAU: 


LE AND CHECK PAC 


MOV 


CR3)*. 84177600 


MOV 


Rl.RO 


MOV 


41. FLAG 


MOV 


41,»4177572 


MOV 


R7.R4 


MFPI 


S(RO)» 


CMP 


CR2),<K> 


BNE 


2* 


MOV 


(SP)*.R5 


CMP 


♦l.FLAG 


BEQ 


11 


ERROR 




.WORD 


230 


.WORD 


MnUERR 


BR 


6« 


CMP 


40. FLAG 


BEQ 


5» 


ERROR 




.UORD 


231 


.WORD 


MMUERR 


CLRB 


SAVbRO 


CMP 


440000. SAVhRO 


BEQ 


4$ 


ERROR 




.WORD 


232 


.WORD 


MMUERR 


CMP 


«20,SAVMR1 


BEQ 


5$ 


ERROR 





J CHECK TO SEE IF IT WAS SUPPOSED TO. 

tAND IF YES CHECK ABORT FLAG AND 

iSTATUS REGISTERS. 

jLET RS. Rl. AND R2 POINT TO THE 

{DOWNWARD EXPANSION TABLES 

i 

sTURN HMU ON 

sDO RELOCATIONS FOR THE DIFFERENT 
J VALUES OF THE PAGE LENGTH FIELD AND 
jBLOCK NUMBER. IF AN ABORT OCCURS 
I CHECK TO SEE IF IT WAS SUPPOSED TO. 
:ANO IF YES CHECK ABORT FLAG AND 
{STATUS REGISTERS. 
jMMU OFF 

! POINT TO A VALUE WHICH SHOULD CAUSE 
J AN ABORT IF MMU IS ON. 
•.SETUP UIPDRO 
:D0 A RELOCATION 
jPOP THE STACK 



: SETUP UIPDRO 

J SAVE A COPY OF Rl 

t SETUP FOR AN ABORT 

:TURN MMU ON 

5 SAVE PC 

•.DO A RELOCATION OPERATION 
:WAS AN ABORT SUPPOSED TO OCCUR 
sIF YES GO TO 2$ 
;POP THE STACK 
:DID AN ABORT OCCUR 
:N0 GO ON 

;ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
:YES GO TO ERROR 

sOID AN ABORT OCCUR 
:YES GO ON 

sALL ERRORS TO TRAP TO EMT VECTOR 

(UNIQUE ERROR NUMBER 

: ADDRESS OF ERROR MESSAGE 
{NO GO TO ERROR 

{SETUP EXPECTED DATA 

i TEST MMRO FOR EXPECTED VALUE 

tIF OK THEN CONTINUE 

I ALL ERRORS TO TRAP TO EMT VECTOR 

i UNIQUE ERROR NUMBER 

i ADDRESS OF ERROR MESSAGE 
{NOT OK THEN GO TO ERROR 

{ TEST MMRl FOR EXPECTED VALUE 

sIF OK THEN CONTINUE 

;ALL ERRORS TO TRAP TO EMT VECTOR 



GLOBAL AREAS MACUl 30A(105t>) 
KOJllA.HAC 20 MAR -84 11:19 



20 MAR 84 11:31 PAGE 50 

T15 TEST PAGE LENGTH E 



2445 
2446 
2447 
2448 
2449 
24S0 
2451 
2452 
2453 
2454 
2455 
2456 
2457 
2458 
2459 
2460 
2461 
2462 
2463 
2464 
2465 
2466 
2467 



012012 
012014 

012016 
012022 
012024 
012026 
012030 

012032 
012036 
012042 
012046 
012052 
012054 
012056 
012060 
012062 
012066 
012070 



000233 
001213 

020467 
001403 
104000 
000234 
001213 

005067 
005067 
005067 
005067 
005201 
005201 
005202 
005202 
021327 
001275 
000207 



167054 



167004 
167030 
167026 
167024 



000777 



5«: 



.UORO 
.WORD 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

CLR 
CLR 
CLR 
CLR 
INC 
INC 
INC 
INC 
CMP 
BNE 
RTS 



233 

MMUERR 

R4,SAVMR2 
61 

234 

MMUERR 

FLAG 

SAVMRO 

SAVMRl 

SAVMR2 

Rl 

Rl 

R2 

R2 

(R3).*777 

TSM9 

PC 



UPWARD EXPANSION TABLES 



2468 


012072 


070006 


PLFO : . WORD 


70006 


2469 


012074 


070006 


.UORO 


70006 


2470 


012076 


070006 


.WORD 


70006 


2471 


012100 


013406 


.WORD 


13406 


2472 


012102 


020006 


.UORO 


20006 


2473 


012104 


004006 


.UORO 


04006 


2474 


012106 


040006 


.WORD 


40006 


2475 


012110 


070006 


.WORD 


70006 


2476 


012112 


024006 


.WORD 


24006 


2477 


012114 


004006 


.WORD 


04006 


2478 


012116 


014006 


.WORD 


14006 


2479 


012120 


012006 


.WORD 


12006 


2480 


012122 


002006 


.WORD 


02006 


2481 


012124 


001406 


.WORD 


01406 


2482 


012126 


004006 


.WORD 


04006 


2483 


012130 


002006 


.WORD 


02006 


2484 


012132 


000406 


.WORD 


00406 


2485 


012134 


007406 


.WORD 


07406 


2486 


012136 


001006 


.WORD 


01006 


2487 


012140 


003406 


.WORD 


03406 


2488 


012142 


000777 


.WORD 


777 


2489 


012144 


013000 


BNO: .UWD 


013000 


2490 


012146 


016000 


.WORD 


016000 


2491 


012150 


017000 


.WORD 


017000 


2492 


012152 


002700 


.WORD 


002700 


2493 


012154 


014000 


.WORD 


014000 


2494 


012156 


002000 


.WORD 


002000 


2495 


012160 


004000 


.WORD 


004000 


2496 


012162 


007000 


.WORD 


007000 


2497 


012164 


002000 


.WORD 


002000 


2498 


012166 


000700 


.WORD 


000700 


2499 


012170 


004000 


.WORD 


004000 


2500 


012172 


001000 


.WORD 


001000 



(UNIQUE ERROR NUMBER 

I ADDRESS Of ERROR MESSAGE 

iNOT OK THEN GO TO ERROR 

I TEST MMR2 TOR EXPECTED VAL'A 

iir OK THEN CCWTINUE 

I ALL ERRORS TO TRAP TO EMT VECTOR 

> UNIQUE ERROR NUMBER 

: ADDRESS OF ERROR MESSAGE 

:NOT OK THEN GO TO ERROR 

, CLEAR MMU ABORT FLAG 

t CLEAR STATUS REGS SAVE AREAS 



sPOINT TO NEXT ENTRr 



{HAVE ALL ENTRIES BEEN TRIED 
:N0 REPEAT 
;YES RETURN 



GLOBAL ARbAS HAC>11 30A(1C52) 
KOJllA.MAC 20 MAR 84 11:19 



2501 


012174 


000300 


.UORD 


2502 


012176 


000400 


.WORD 


2503 


012200 


001400 


.WORD 


2504 


012202 


000600 


.WORD 


.'505 


012204 


000200 


.WORD 


.'506 


012206 


001700 


.WORD 


«;507 


012210 


000300 


.WORD 


2506 


012212 


000700 


.WORD 


2509 


012214 


000000 


ABORTO: .WORD 


2510 


012216 


000000 


.WORD 


2511 


012220 


000001 


.WORD 


2512 


012222 


000000 


.WORD 


2513 


012224 


000001 


.WORD 


2514 


012226 


000001 


.WORD 


2515 


012230 


000000 


.WORD 


2516 


012232 


000000 


.UORO 


2517 


012234 


000000 


.WORD 


2518 


012236 


000000 


.UORO 


2519 


012240 


000001 


.WORD 


2520 


012242 


000000 


.UORO 


2521 


012244 


000000 


.UORO 


2522 


012246 


000001 


.UORO 


2523 


012250 


OOOOOl 


.UORD 


2524 


012252 


000001 


.UORD 


2525 


012254 


OOOOOl 


.WORD 


2526 


012256 


000000 


.UORD 


2527 


012260 


OOOOOl 


.UORO 


2528 


012262 


000000 


.UORO 


2529 






i 


2530 






;DOUNUARO EXP/ 


2531 






• 

PLFl: .UORD 


2532 


012264 


000416 


2533 


012266 


020016 


.UORO 


2534 


012270 


024016 


.UORO 


2535 


012272 


034016 


.UORD 


2536 


012274 


074016 


.WORD 


2537 


012276 


040016 


.UORO 


2538 


012300 


020016 


.WORD 


2539 


012302 


000016 


.UORO 


2540 


012304 


03O016 


.WORD 


2541 


012306 


010016 


.UORD 


2542 


012310 


014016 


.WORD 


2543 


012312 


004016 


.UORD 


2544 


012314 


002016 


.UORO 


2545 


012316 


000416 


.UORO 


2546 


012320 


000016 


.UORD 


2547 


012322 


003416 


.WORD 


2548 


012324 


001016 


.UORD 


2549 


012326 


001416 


.WORD 


2550 


012330 


000416 


.UORO 


2551 


012332 


000777 


.UORD 


2552 


012334 


000100 


BNl: .UORO 


2553 


012336 


010000 


.UORD 


2554 


012340 


006000 


.UORD 


2555 


012342 


016000 


.UORD 


2556 


012344 


016000 


.UORO 



f 14 

1Ee^^:ENGTH ERROR ABORTS 



000300 

000400 

001400 

000600 

000200 

001700 

000300 

000700 

0 

0 

1 

0 

1 
1 

0 
0 
0 
0 

1 

0 
0 

1 
1 
1 
1 

0 

1 

0 

ISION TABLES 

00416 
20016 
24016 
34016 
74016 
40016 
20016 
00016 
30016 
10016 
14016 
04016 
02016 
00416 
00016 
03416 
01016 
01416 
00416 
777 

000 100 
010000 
006000 
016000 
016000 



N4 



GLOBAL AREAS 
KOJllA.MAC 



MACni 30A(1052) 
20 MAR 84 11:19 



20 -MAR 64 
T15 



11:31 PAGE 52 

TEST PAGE LENGTH ERROR ABORTS 



SEQ 



2557 


012346 


004000 








.UORD 


004000 




2558 


012350 


000000 








.WORD 


OOOOOO 




2559 


012352 


OOOOOO 








.UCRO 


OOOOOO 




2560 


012354 


004000 








.WORD 


004000 




2561 


012356 


004000 








.UORO 


004000 




2562 


012360 


004000 








.UORO 


004000 




2563 


012362 


OOOOOO 








.WORD 


OOOOOO 




2564 


012564 


000300 








.UORO 


000300 




2565 


012366 


OOOOOO 








.WORD 


OOOOOO 




2566 


012570 


000400 








.UORO 


000400 




2567 


012372 


001000 








.WORD 


001000 




2568 


012374 


000100 








.UORO 


000100 




2569 


012576 


000400 








.UORD 


000400 




2570 


012400 


000200 








.WORD 


000200 




2571 


012402 


OOOOOO 






ABORTl: 


.UORD 


0 




2572 


012404 


OOOOOO 








.UORO 


0 




2575 


012406 


OOOOOO 








.UORO 


0 




2574 


012410 


OOOOOO 








.UORD 


0 




2575 


012412 


000001 








.UORO 


1 




2576 


012414 


000001 








.UORO 


1 




2577 


012416 


000001 








.WORD 


1 




2578 


012420 


OOOOOO 








.WORD 


0 




2579 


012422 


000001 








.UORO 


1 




2580 


012424 


OOOOOO 








.WORD 


0 




2581 


012426 


OOOOOO 








.UORO 


0 




2582 


012430 


000001 








.WORD 


1 




2583 


012432 


000001 








.UORO 


1 




2584 


012434 


000001 








.UORD 


1 




2585 


012436 


OOOOOO 








.WORD 


0 




2586 


012440 


OOOOOO 








.UORO 


0 




2587 


012442 


000001 








.UORD 


1 




2588 


012444 


OOOOOO 








.UORO 


0 




2589 


012446 


OOOOOO 








.UORD 


0 




2590 










fs9FIN: 








2591 


012450 














2592 


012450 








TSMniO: 








2593 


















2594 










•.♦TEST 


16 


FUNCTIONAL TEST OF BITS <6:1> OF MMRO 


2595 










S • ***************************************** **4********4«**4i****** 


2596 


012450 








TST16: 








2597 


012450 


005267 


166350 






INC 


JTESTN 


INCREMENT TEST NUMBER 


2598 


012454 


005037 


177572 






CLR 


80177572 i 


MMVJ OFF 


2599 


012460 


005067 


166356 






CLR 


FLAG 


CLEAR MMU ABORT FLAG 


2600 


012464 


005067 


166402 






CLR 


SAVMRO 


CLEAR STATUS REGS SAVE AREAS 


2601 


012470 


005067 


166400 






CLR 


SAVMRl 




2602 


012474 


005067 


166376 






CLR 


SAVMR2 




2603 


012500 


004767 


166602 






JSR 


PC.MMU 


INIT MMU 


2604 


012504 


005037 


177776 






CLR 


8*177776 


INIT PSU: PREVIOUS MODE - KERNAL 


2605 


012510 


012702 


020200 






MOV 


»20200.R2 


(SETUP KIPDRl TO ABORT 


2606 


012514 


012737 


077400 


172302 




MOV 


*77400.a«l 72502 


2607 


012522 


012767 


000001 


166312 




MOV 


•l.FLAG 


SETUP FLAG FOR AN ABORT 


2608 


012530 


012737 


000001 


177572 




MOV 


*1. 8*177572 


.TURN MMU ON 


2609 


012536 


010701 








MOV 


R7.R1 


iSAVE PC 


2610 


012540 


006522 








MFPI 


(R2)» 


,00 A RELOCATION VIA KIPARl 


2611 


012542 


012704 


100003 






MOV 


n00005.R4 


i SETUP EXPECTED DATA 


2612 


012546 


004 767 


000210 






JSR 


PC.TSIO 


CHECK IF AN ABORT OCCURRED AND 



GLOBAi. AREAS 
KOJllA.MAC 
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T16 FUNCTIONAL TEST OF BITS «6:1> OT MMRO 



S£Q 0055 



^bl5 








£614 


012552 


012737 


030000 


£61S 


012560 


004767 


166522 


2616 


012564 


012737 


077400 


2617 


012572 


012737 


001600 


2618 








2619 


012600 


012702 


160000 


2620 


012604 


012767 


000001 


2621 


012612 


012737 


000001 


2622 


012620 


010701 




2623 


012622 


106522 




2624 


012624 


012704 


100177 


2625 


012630 


004767 


000126 


2626 








2627 


012634 


012737 


010000 


2628 


012642 


004767 


166440 


2629 


012646 


012737 


077400 


26 SO 


012654 


012702 


120000 


2631 


012660 


012767 


000001 


2632 


012666 


012737 


000001 


2633 


012674 


010701 




2634 


012676 


006522 




2635 


012700 


012704 


100053 


2636 


012704 


004767 


000052 


2637 








2638 








2639 








2640 








2641 


012710 


012737 


020000 


2642 


012716 


004767 




2643 


012722 


012702 


040000 


2644 


012726 


012767 


000001 


2645 


012734 


012737 


000001 


2646 


012742 


010701 




2647 


012744 


106522 




2648 


012746 


012704 


100105 


2649 








2^50 


012752 


004767 


000004 


2651 








2652 








2653 


012756 


000167 


000102 


2654 








2655 








2656 








2657 








2658 


012762 


022767 


000000 


2659 


012770 


001403 




2660 


012772 


104000 




2661 


012774 


000235 




2662 


012776 


001213 




2663 








2664 


013000 


020467 


166066 


2665 


013004 


001403 




2666 


013006 


104000 




2667 


013010 


000236 




2668 


013012 


001213 





177776 

177636 
177676 



166230 

177572 



177776 
172212 

166154 

177572 







lIF YES CHECK BITS <6:1> OF MMRO. 


NOV 


«3OO0O,S4l77776 


lINIT PSU; PREVIOUS MODE ■ USER 


JSR 


PC.MMU 


lINIT MMU 


MOV 


•77400.8*177636 


1 SETUP U0PDR7 TO ABORT 


HOV 


•1600. B*l 77676 


iSET U0PAR7 TO RELOCATE TO PHYSICAL 






•ADDRESSES 160000-177776 


MOV 


• 160000. R2 


1 


MOV 


•l.FLAG 


1 SETUP FLAG FOR AN ABORT 


MOV 


♦1.84177572 


(TURN MMU ON 


MOV 


R7.R1 


iSAVE PC 


MFPD 


(R2). 


lOO A RELOCATION VIA U0PAR7 


MOV 


•100177. R4 


J SETUP EXPECTED DATA 


JSR 


PC.TSIO 


•CHECK IF AN ABORT OCCURRED AND 






•IF YES CHECK BITS <6:1> OF MMRO, 


MOV 


♦10000. 8*1 77776 


•INIT PSU: PREVIOUS MODE- SUPERVISOR 


JSR 


PC.MMU 


iINIT MMU 


MOV 


♦77400. S41 72212 


•SETUP SIPDR5 TO ABORT 


MOV 


• 120000. R2 


•ACCESS PAGE 05 


MOV 


•I. FLAG 


•SETUP FLAG FOR AN ABORT 


MOV 


♦1. 8^177572 


•TURN MMU ON 


MOV 


R7.RI 


•SAVE PC 


MFPI 


(R2)» 


•DO A RELOCATION VIA SIPAR5 


MOV 


♦100053. R4 


•SETUP EXPECTED DATA: ABORT. PAGE 05 


JSR 


PC.TSIO 


•CHECK IF AN ABORT OCCURRED AND 






•IF TES CHECK BITS <6:1> OF MMRO. 



177776 



166106 
177572 



•TEST THAT ILLEGAL MODE CAUSES MMU ABORT 

' MOV ♦20000.a^l 777 76 

JSR PC.MMU 

MOV ♦40000. R2 

MOV •l.FLAG 

MOV •1.8#177572 

MOV R7,R1 

MFPD CR2). 

MOV •100105.R4 



JSR 



JMP 



PC.TSIO 



TIOFIN 



•INIT PSU:SET ILLEGAL PREVIOUS MODE 
•INIT MMU 

•SET UP ACCESS TO PAGE 2 
•SETUP FLAG FOR AN ABORT 
•TURN MMU ON 
•SAVE PC 

•DO A RELOCATION 

•SETUP EXPECTED DATA:ABO«'. ILLEGAL 
J PROCESSOR MODE. PAGE 02 
•CHECK IF AN ABORT OCCURRED AND 
•IF YES CHECK BITS <6:1> OF MMRO. 



166052 



•ROUTINE TO CHECK IF A HMu 
tCONTAINS EXPECTED DATA 

TSIO: CMP •O.fLAG 

BEQ II 
ERROR 

.UORO 235 

. WORD MMUtRR 

1$: CMP R4.SAVMR0 

BEQ 2t 
ERROR 

.WORD 2 36 

.UORD MMUERR 



ABORT OCCURRED AND If- STATUS REG MMRO 



•DID AN ABORT OCCUR 
•YES GO ON 

•ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

J TEST MMRO FOR EXPECTED DATA 
•OK GO ON 

•ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
•ADDRfcSS OF ERROR MESSAGE 



S?bS!?il.«SP' ..0"Aji^^i4'?fiir^' ^0^'«'T?g ^^^^ANC??86Ap*TtST or BUS «6:l> Of 



















iNO GO 


TO ERROR 




013014 


022767 


000022 


166052 




cr«> 


•22. SAVMR I 




1 TEST MMRl FOR EXPECTED DATA 


26 71 


013022 


001405 








BEQ 


5t 




lOK GO ON 


26 72 


015024 


104000 








ERROR 






lALL ERRORS TO TRAP TO EMT VECTOR 


2673 


013026 


000237 








.WORD 


257 




1 UNIQUE ERROR NUMBER 


2674 


015030 


001213 








.WORD 


MMUERR 




1 ADDRESS OF ERROR MESSAGE 


2675 
















iNO GO 


TO ERROR 


2676 


015052 


020167 


166040 




lit 


CMP 


RI.SAVMR2 




I TEST MMR2 FOR EXPECTED DATA 


2677 


013036 


001405 








BEQ 


4t 




lOK GO ON 


2678 


015040 


104000 








ERROR 






|ALL ERRORS TO TRAP TO EMT VECTOR 


2679 


013042 


000240 








.WORD 


240 




1 UNIQUE ERROR NUMBER 


2o80 


013044 


001213 








.UORD 


MMUERR 




1 ADDRESS OF ERROR MESSAGE 


2681 
















iNO GO 


TO ERROR 


2682 


013046 


005067 


166020 




41: 


CLR 


SAVMRO 




1 CLEAR MMU STATUS REGS SAVE AREAS 


2685 


015052 


005067 


166016 






CLR 


SAVMRl 




1 


2664 


015056 


005067 


166014 






ClR 


SAVMR2 






2685 


015062 


000207 








RTS 


PC 




'{RETURN 


2686 










i 










2687 


015064 








TlOflN: 










2688 


013064 








TS^tlll: 










2689 




















2690 










i^TEST 


17 


TEST DATA SPACE 


BITS MMR5 


2691 




















2692 


015064 








TST17: 










2695 


015064 


005267 


165714 






INC 


ITESTN 




1 INCREMENT TEST NUMBER 


2694 


015070 


005057 


177572 






CLR 


»#177572 




|MMU OFF 


2695 


015074 


005067 


165742 






CLR 


FLAG 




1 CLEAR MMU ABORT FLAG 


2696 


015100 


012737 


050000 


177776 




MOV 


•50000. aH77776 




I SETUP PSU 


2697 


015106 


012701 


000026 






MOV 


•26, Rl 




1 SETUP FIRST MMR5 VALUE 


2698 


015112 


012703 


177610 






MOV 


•177610. R3 




(POINT TO UIP0R4 


2699 


015116 


012704 


000021 






MOV 


•21, R4 




J SETUP SECOND MMR5 VALUE 


2700 


015122 


004767 


000060 






JSR 


PC, TSll 




> TEST ENABLE USER DATA SPACE BIT 


2701 


015126 


012737 


000000 


177776 




MOV 


•0.»#177776 




J SETUP PSW 


2702 


013134 


012701 


000025 






MOV 


•25. Rl 




J SETUP FIRST MMR5 VALUE 


2705 


015140 


012703 


172510 






MOV 


•172510. R3 




1 POINT TO KIP0R4 


2704 


015144 


012704 


000024 






MOV 


•24. R4 




: SETUP SECOND MMR5 VALUE 


2705 


015150 


004767 


00005? 






JSR 


PC , TSll 




1 TEST ENABLE KERNEL DATA SPACE 81 »" 


2706 


015154 


012737 


010000 


177776 




MOV 


•10000. S«177776 




1 SETUP PSU 


2707 


015162 


012701 


000025 






MOV 


♦25, Rl 




1 SETUP FIRST MMR3 VALUE 


2708 


015166 


012703 


172210 






MOV 


•172210. R5 




jPOINT TO SIP0R4 


2709 


015172 


012704 


000022 






MOV 


•22, R4 




1 SETUP SECOW MMR3 VALUE 


2710 
2711 


013176 


004767 


000004 






JSR 


PC. TSll 




t TEST ENABLE SUPERVISOR DATA SPACE BIT 


2712 


013202 


000167 


000150 






JMP 


TllFIN 






2715 




















2714 
2715 










iROUTINE TO TEST ENABLE DATA SPACE BITS OF nr«)5 


2716 


015206 


004 767 


166074 




TSll: 


JSR 


PC.MMU 




jINIT MMU 


2717 


013212 


010137 


172516 






MOV 


Rl. Ml 72516 




{DISABLE DATA SPACE OF MODE UNDER TEST 


2718 


013216 


012715 


077400 






MOV 


♦77400, (R5) 




(SETUP IPDR TO ABORT 


2719 


013222 


012702 


100000 






MOV 


•100000,R2 






2720 


013226 


012767 


000001 


165606 




MOV 


•I. FLAG 




1 SETUP FLAG FOR AN ABORT 


2721 


015254 


012757 


000001 


177572 




MOV 


•I.B»17 7572 




,MMU ON 


2722 


015242 


106522 








MFPD 


(R2). 




lOO A RELOCATION 


2725 


013244 


022767 


000000 


165570 




CMP 


•O.FLAG 




tOID AN ABORT OCCL« 


2724 


013252 


001405 








BEQ 


1« 




lYES GO ON 



£7^5 


013254 


104000 








ERROR 


2726 


015256 


000241 








.UORO 


2727 


015260 


001215 








.WORD 


2728 














2729 


013262 


010437 


172516 




1»: 


HOV 


2750 


013266 


012702 


100000 






HOV 


2731 


013272 


012767 


000001 


165542 




MOV 


2752 


013300 


012737 


000001 


177572 




MOV 


275S 


013306 


106522 








MFPD 


2734 


013310 


0OS726 








TST 


2735 


013512 


022767 


000001 


165522 




CMP 


2756 


015520 


001405 








BEQ 


2757 


015522 


104000 








ERROR 


2758 


015524 


000242 








.WORD 


2759 


015526 


001215 








.WORD 


2740 














2741 


013330 


005067 


165506 




21: 


CLR 


2742 


013334 


000207 








RTS 


2745 










i 




2744 


015536 








TliriN: 




2745 


015556 








TSMM12: 




2746 














2747 










l*T6ST 


20 


2748 














2749 


015556 








TST20: 




2750 


015536 


005267 


165442 






INC 


2751 


015342 


005057 


177572 






CLR 


2752 


015346 


005067 


165470 






CLR 


2755 


015552 


005067 


165516 






CLR 


2754 


015556 


004767 


165724 






JSft 


2755 


015362 


012757 


050000 


177776 




MOV 


2756 


015570 


012704 


100200 






MOV 


2757 


015574 


010401 








MOV 


2758 


015576 


012705 


100101 






HOV 


2759 


015402 


010502 








MOV 


2760 


015404 


012757 


000020 


172516 




MOV 


2761 


013412 


012757 


077402 


172310 




MOV 


2762 


015420 


012703 


006414 






MOV 


2765 


013424 


012767 


000001 


165410 




MOV 


2764 


015452 


012757 


000001 


177572 




MOV 


2765 


013440 


010767 


165364 






MOV 


2766 


013444 


112425 








MOVB 


2767 


013446 


004767 


000206 






JSR 


2768 














2769 


015452 


012705 


175011 






MOV 


2770 


015456 


012767 


000001 


165556 




MOV 


2771 


013464 


012757 


000001 


177572 




MOV 


2772 


013472 


010767 


165532 






MOV 


2775 


013476 


112142 








MOVB 


2774 


013500 


004767 


0001S4 






JSR 


2775 














2776 


015504 


012703 


006771 






MOV 


2777 


015510 


012767 


000001 


165524 




MOV 


2778 


015516 


012757 


000001 


177572 




MOV 


2779 


015524 


010767 


165300 






MOV 


2780 


013550 


114125 








MOVB 



A^^PACF BITS MMR3 



I ALL ERRORS TO TRAP TO EMT VECTOR 

241 I UNIQUE ERROR NUMBER 
MMUERR I ADDRESS OF ERROR MESSAGE 

I NO GO TO ERROR 

R4. 8*172516 lENABLE DATA SPACE Of MODE UNDER TES^ 

•100000. R2 I 

♦I. FLAG » SETUP FLAG FOR AN ABORT 

•l.»#l 77572 |MMU ON 

(R2)> tOO A RELOCATION 

(SP)» I POP THE STACK 

«1.FLAG I DID AN ABORT OCCUR 

2* iNO GO ON 

I ALL ERRORS TO TRAP TO EMT VZCTQR 

242 (UNIQUE ERROR NUMBER 
MMUERR t ADDRESS OF ERROR MESSAGE 

(YES GO TO ERROR 
FLAG iCLEAR MMU ABORT FLAG 

PC {RETURN 



MMRl FUNCTIONAL TEST 



♦TESTN 
8#177572 
FLAG 
SAVMRl 
PC. MMU 

♦50000. 8«177776 

«100200.R4 

R4.R1 

♦100101.R5 
R5.R2 

#20. 8« 1725 16 
♦77402. 8#1 72510 
♦6414,R5 

♦l.FLAG 
♦1. 8^1 7 7572 
R7.SL0C0O 
(R4)»,(R5)» 
PC.TS12 

♦175011.R5 

♦l.FLAG 

♦l.a#177572 

R7,SL0C00 

(Rl)». -(R2) 

PC.TS12 

♦6771. R3 
♦l.FLAG 
♦l.»^177572 
R7.SL0C0O 
(R1),<R5)» 



INCREMENT TEST NUMBER 
MMU OFF 

CLEAR MMU ABORT FLAG 
CLEAR STATUS REG SAVE AREA 
INIT MMU 
INIT PSU 

SET'JP TEST LOCATIONS 



INIT MMR3 

SETUP KIPDR4 TO ABORT 
SETUP EXPECTED DATA FOR MMRl 
SETUP FLAG FOR AN ABORT 
TURN MMU ON 
SAVE PC 

DO A RELOCATION 

CHECK IF AN ABORT OCCURRED AND IF 
YES IF MMRl EQUALS EXPECTED DATA 
SETUP EXPECTED DATA FOR MMRl 
SETUP FLAG FOR AN ABORT 
TURN MMU ON 
SAVE PC 

00 A RELOCATION 

CHECK IF AN ABORT OCCURRED AND IF 
lES IF MMRl EQUALS EXPECTED DATA 
SETUP EXPECTED DATA FOR MMRl 
SETUP FLAG FOR AN ABORT 
TURN MMU ON 
SAVE PC 

00 A RELOCATION 



GLOBAL AREAS HACUl S0A(10S2) 20 MAR 84 11:31 PAGh 56 
KOJllA.HAC 20 MAR 84 11:19 T20 MMRl FUNCTIONAL TEST 



2761 


01 3532 


004767 


000122 






JSR 


PC.TS12 






i CHECK IF AN ABORT OCCURRED AND IF 


2782 




















lYES IF MMRl EQUALS EXPECTED DATA 


2785 


015536 


012703 


006411 






MOV 


•6411. R3 






i SETUP EXPECTED DATA FOR MMRl 


2784 


013542 


012767 


000001 


165272 




MOV 


41. FLAG 






(SETUP FLAG FOR AN ABORT 


2785 


013550 


012737 


000001 


1775V2 




MOV 


•1.84177572 






iTURN MMU ON 


2786 


015556 


010767 


165246 






MOV 


R7.SL0COO 






J SAVE PC 


2787 


015562 


112125 








MOVB 


(R1)«.(R5)* 






lOO A RELOCATION 


2788 


015564 


004767 


000070 






JSR 


PC.TS12 






; CHECK IF AN ABORT OCCURRED AND IF 


?789 




















lYES IF MMRl EQUALS EXPECTED DATA 


2790 


013570 


012703 


171025 






MOV 


♦1 71025. R3 






iSETUP EXPECTED DATA FOR MMRl 


2791 


015574 


012767 


000001 


165240 




MOV 


•I. FLAG 






1 SETUP FLAG FQR AN ABORT 


2792 


015602 


012757 


000001 


177572 




MOV 


•1.8*177572 






J TURN MMU ON 


2793 


015610 


010767 


165214 






MOV 


R7.SL0COO 






J SAVE PC 


2794 


015614 


012542 








MOV 


(R5)». -(R2) 
PC.TS12 






iOO A RELOCATION 


2795 


013616 


004767 


000056 






JSR 






» CHECK IF AN ABORT OCCURRED AND IF 


2796 




















jTES IF MMRl EQUALS EXPECTED DATA 


2797 


015622 


012703 


012762 






MOV 


♦12762. R3 






» SETUP EXPECTED DATA FOR MMRl 


2798 


015626 


012767 


000001 


165206 




MOV 


•l.FLAG 






t SETUP FLAG FOR AN ABORT 


2799 


015654 


012737 


000001 


177572 




MOV 


♦1. 8^177572 






:TURN MMU ON 


2800 


015642 


010767 


165162 






MOV 


R7.SL0C00 






8 SAVE PC 


2801 


015646 


014225 








MOV 


-(R2).(R5). 






sDO A RELOCATION 


2802 


015650 


004767 


000004 






JSR 


PC.TS12 






; CHECK IF AN ABORT OCCURRED AND IF 


2803 




















;rES IF MMRl EQUALS EXPECTED DATA 


2804 






















2805 


013654 


000167 


000062 






JMP 


T12FIN 








2806 






















2807 










5 ROUTINE TO CHECK IF AN ABORT 


OCCURRED 


AND IF MMRl EQUALS EXPECTED DATA 


2808 






















2809 


015660 


Oc"5!767 


000000 


165154 


TS12: 


CMP 


♦O.FLAG 






iDIO AN ABORT OCCUR 


2810 


013666 


001405 








BEQ 


It 






iYES GO ON 


2811 


015670 


104 500 








ERROR 








{ALL ERRORS TO TRAP TO EMT VECTOR 


2812 


013672 


000<>43 








.WORD 


243 






i UNIQUE ERROR NUMBER 


2815 


015674 


001213 








.WORD 


ftlUERR 






{ADDRESS OF ERROR MESSAGE 


2814 
















;N0 


GO 


TO ERROR 


2815 


015676 


020367 


165172 




1$: 


CMP 


R5.SAVMR1 




J TEST MMRl FOR EXPECTED DATA 


2816 


015702 


001403 








BEQ 


2* 






lOK GC ON 


2817 


015704 


104000 








ERROR 








J ALL ERRORS TO TRAP TO EMT VECTOR 


2818 


015706 


000244 








.UORO 


244 






{UNIQUE ERROR NUMBER 


2819 


015710 


001213 








.WORD 


MMUERR 






{ADDRESS OF ERROR MESSAGE 


2820 
















tNO 


GO 


TO ERROR 


2821 


015712 


026767 


165112 


165156 


2»: 


CMP 


SL0COO,SAVMR2 






1 TEST MMR2 FOR EXPECTED DATA 


2822 


015720 


001403 








BEQ 


3* 






tOK GO ON 


2823 


015722 


104000 








ERROR 








{ALL ERRORS TO TRAP TO EMT VECTOR 


2824 


015724 


000245 








.WORD 


245 






(UNIQUE ERROR NUMBER 


2825 


013726 


001213 








.WORD 


MMUERR 






{ADDRESS OF ERROR MESSAGE 


2826 
















iNO 


GO 


TO ERROR 


2827 


013730 


005067 


165140 




3$: 


CLR 


SAVMRl 






(CLEAR STATUS REG SAVE AREA 


2828 


015754 


005067 


165156 






CLR 


SAVMR2 








2829 


013740 


000207 








RTS 


PC 






Ire TURN 


2830 




















2831 


013742 








T12FIN: 












2852 


013742 








TSMM13: 












2853 










,*TEST 












2854 










21 


ADDER RELOCATION TEST PART A 


2835 










iCNEEO 












2836 










16 BITS 


OF MEMORY ADDRESSING) 





GLOeAi ARE MS 
KOJllA.MAC 



MAC in 50A(1052) 
20 MAR 84 11:19 



<>0 



HAR 04 

T21 



F5 

^^'lioEn'^SlLB^ATION TEST PART A 



OtQ 00S7 



2837 








2838 


013742 






2839 


013742 


005267 


165036 


2840 


013746 


00SO37 


177572 


2841 


013752 


005067 


165064 


2842 


013756 


005037 


177776 


2845 


013762 


004767 


165320 


2844 


013766 


012737 


000020 


2845 


015774 


012703 


014164 


2846 


014000 


012701 


014216 


2847 


014004 


012133 




2848 


014006 


021127 


000333 


2849 


014012 


001374 




2850 


014014 


012703 


014502 


2851 


014020 


012701 


014250 


2852 


014024 


012702 


014354 


2853 


014030 


012237 


177776 


2854 


014054 


013505 




2855 


014056 


012757 


000001 


2856 


014044 


006551 




2857 


014046 


012604 




2856 


014050 


005057 


177572 


2859 


014054 


020504 




2860 


014056 


001403 




2861 


014060 


104000 




2862 


014062 


000246 




2863 


014064 


001215 




2864 








2865 


014066 


021527 


000111 


2866 


014072 


001556 




2867 


014074 


005205 




2666 


014076 


005205 




2869 


014100 


005201 




2870 


014102 


005201 




2871 


014104 


005202 




2872 


014106 


005202 




2873 


014110 


012257 


177776 


2874 


014114 


015505 




2875 


014116 


012757 


000027 


2676 


014124 


012757 


000001 


2877 


014132 


106531 




2676 


014154 


012604 




2679 


014136 


005057 


177572 


2680 


014142 


005057 


172516 


2861 


014146 


020504 




2662 


014150 


001405 




2663 


014152 


104000 




2864 


014154 


000247 




2885 


014156 


001215 




2686 








2887 


014160 






2888 








2869 


014160 


000167 


000202 


2890 








2891 








2892 









TST21: 



172516 



1(: 



21: 



177572 



3»: 



172516 
177572 



INC 


ITESTN 


CLR 


»#1775'»2 


CLR 


PLAG 


CLR 


»#177776 


JSR 


PC.MMU 


MOV 


«20.S*172516 


MOV 


«PARA0I.R3 


MOV 


«PARVA1.R1 


MOV 


(R1^».B(R5)» 


CMP 


(Rl).«335 


BNE 


If 


MOV 


0PHY1.R3 


MOV 


•VIRl.Rl 


MOV 


#M0DE1.R2 


MOV 


(R2)»,a#177776 


MOV 


a(R5)»,R5 


MOV 


♦1.W177572 


MTPI 


af Ri ) * 


MOV 


(SP)».R4 


CLR 


8*177572 


CMP 


R5.R4 


BEQ 


5> 


ERROR 




.WORD 


246 


.WORD 


MMUERR 


CMP 


(R3),#lll 


BNE 


2% 


INC 


R5 


INC 


R5 


INC 


Rl 


INC 


Rl 


INC 


R2 


INC 


R2 


MOV 


<R2)». 8*177776 


MOV 


8(R5)*.R5 


MOV 


*27.»*1 72516 


MOV 


*1. 8*177572 


MFPD 


a(Rl)» 


MOV 


(SP)..R4 


CLR 


a#l7757? 


CLR 


8*172516 


CMP 


R5.R4 


BEQ 


4$ 


ERROR 




.UORO 


24 7 


.UORD 


MMUERR 


JMP 


ri5FIN 



41: 



I ADDER TEST PART A TABLES 
t 



INCREMENT TEST NUMBER 
MMU OFF 

CLEAR MHU ABORT FLAG 
INIT PSU 
INIT MMU 
INIT MMR5 

SETUP PARS WITH TEST VALUES 



SET POINTERS TO ADDER PART A 
TEST TABLES. 

INIT PSU 

SAVE DATA AT PHYSICAL ADDRESS 
TURN MMU ON 

SAVE DATA AT RELOCATED VIRTUAL ADDRESS 
iTlJRN MMU OFF 

lis DATA EQUAL TO EXPECTED 
I YES GO ON 

[ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
tNO IT IS AN ADDER ERROR 

J ARE UE READY TO TEST DATA SPACE 
iNO GO TO 2% 

; POINT TO DATA SPACE VALUES 



I INIT PSU 

iSAVE DATA AT PHYSICAL ADDRESS 
[INIT MMR5 
[TURN MMU ON 

[SAVE DATA AT RELOCATED VIRTUAL ADDRESS 
J POP THE STACK 
iTURN MMU OFF 
[CLEAR MMR5 

lis DATA EQUAL TO EXPECTED 
[YES GO ON 

[ALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 
[ADDRESS OF ERROR MESSAGE 
iNO IT IS AN ADDER ERROR 



Gb 



GLOBAL AREAS MACUl 50A(1052) 
KDJllA MAC 20 MAR 84 11:19 



20 HAR 84 11:31 PAGE 58 

rpi ADDER RELOCATION TEST PART A 



SEQ 0058 



2893 


014164 


172240 


PARAO) '. 


.UORO 


172240 


2894 


014166 


177642 




.WORD 


177642 


2895 


014170 


172252 




.UORO 


172252 


2896 


014172 


177640 




.WORD 


177640 


2897 


014174 


172242 




.UORO 


172242 


2898 


014176 


172254 




.WORD 


172254 


2899 


014200 


177652 




.WORD 


177652 


2900 


014202 


177644 




.UORO 


177644 


2901 


014204 


172246 




.UORO 


172246 


2902 


014206 


177654 




.WORD 


177654 


290S 


014210 


172250 




.UORD 


172250 


2904 


014212 


177660 




.UORO 


177660 


2905 


014214 


000533 




.UORD 


555 


2906 


014216 


000000 


PARVAl: 


.UORD 


000000 


2907 


014220 


000010 




.WORD 


000010 


2908 


014222 


177777 




.UORD 


177777 


2909 


014224 


177601 




.UORD 


177601 


2910 


014226 


000010 




.UORD 


000010 


2911 


014250 


000052 




.UORD 


000052 


2912 


014252 


000070 




.UORD 


000070 


2915 


014234 


000010 




.UORD 


000010 


2914 


014256 


000010 




.UORD 


000010 


2915 


014240 


000060 




.UORD 


000060 


2916 


014242 


000000 




.UORD 


000000 


2917 


014244 


000010 




.WORD 


000010 


2918 


014246 


000355 




.UORD 


555 


2919 


014250 


000000 


VIRl: 


.UORD 


000000 


2920 


014252 


025000 




.UORD 


025000 


2921 


014254 


155224 




.UORD 


155224 


2922 


014256 


017700 




.UORD 


017700 


2925 


014260 


055000 




.UORO 


055000 


2924 


014262 


145252 




.UORD 


145252 


2925 


014264 


121000 




.UORD 


121000 


2926 


014266 


045000 




.UORD 


045000 


2927 


014270 


075000 




.UORD 


075000 


2928 


014272 


142000 




.UORD 


142000 


2929 


014274 


117700 




.UORD 


117700 


2950 


014276 


000111 




.UORD 


111 


2951 


014500 


007000 




.UORO 


007000 


2952 


014502 


000000 


PMYl: 


.UORO 


000000 


2955 


014504 


006000 




.WORD 


006000 


2954 


014506 


015124 




.UORD 


015124 


2955 


014510 


000000 




.UORO 


000000 


2956 


014512 


014000 




.UORO 


014000 


2957 


014514 


012452 




.UORD 


012452 


2958 


014516 


010000 




.UORD 


010000 


2959 


014520 


004000 




.UORO 


004000 


2940 


014522 


016000 




.UORD 


016000 


2941 


014524 


010000 




.UORD 


010000 


2942 


014526 


017700 




.UORD 


017700 


2945 


014550 


000111 




.UORO 


111 


2944 


014552 


010000 




.UORD 


010000 


2945 


014554 


010000 


MOOEl: 


.UORO 


010000 


2946 


014556 


050000 




.UORD 


030000 


2947 


014540 


010000 




.UORD 


010000 


2948 


014542 


050000 




.UORO 


030000 



GLOBAL AKAS 
KDJllM.MAC 



MAC 11 1 5OAC1052 
aO MAR 84 11:19 



) <>0 MAR 



TION TEST 



PART A 



2949 

2950 
2951 
2952 
2953 
2954 
2955 
2956 
2957 
2958 
2959 
2960 
2961 
2962 
2963 
2964 
2965 
2966 
2967 
2968 
2969 
2970 
2971 
2972 
2973 
2974 
2975 
2976 
2977 
2978 
2979 
2980 
2981 
2982 
2983 
2984 
2985 
2986 
2987 
2988 
2989 
2990 
2991 
2992 
2993 
2994 
2995 
2996 
2997 
2998 
2999 
3000 
3001 
3002 
3003 
3004 



014544 
014346 
014350 
014552 
014354 
014356 
014360 
014362 
014364 

014366 
014366 



010000 
010000 
030000 
030000 
010000 
030000 
OlOOOO 
000111 
030000 



.WORD 
.UORD 
.UORD 
.WORD 
.WORD 
.WORD 
.UORD 
.WORD 
.WORD 



010000 
010000 
030000 
030000 
010000 
030000 
010000 
111 

030000 



T15FIN: 
TS1822: 
1 1 *••***••*»< 

j*TEST 22 

'check the SOTTUARE switch register to determine if this is a 22 BIT OR AN 
;18 bit address SYSTEM. BIT 08 IN THE SWR«l INDICATES AN 18 BIT SYSTEM. 
; IF WE'RE IN A 22 BIT SYSTEM WE CAN PERFORM SOME EXTRA TESTS. 



TEST 22/18 BIT ADDRESS OPTION 



014366 
014366 
014372 
014400 
014402 



005267 164412 

032777 000400 
001405 

062737 000001 



TST22: 



164446 
001004 



014410 000167 001472 



INC 
BIT 
BEQ 
ADD 

JMP 



»TESTN 

•BIT08,9SUR 

100$ 

«1.8«*TESTN 
T14FIN 



INCREMENT TEST NUMBER 

IS BIT 08 SET? 

BRANCH IF ITS NOT 

I KEEP TEST NUMBERS IN ORDER 

;ADD 1 FOR THE TESTS WE'RE SKIPPING 

J SKIP OVER THESE TESTS IF IT IS 



IF THIS IS A 22 BIT SYSTEM CHECK THE 22/18 BIT ADDRESS OPTION 

TO TEST 22 BIT ADDRESSING WE DO THE FOLLOWING: 

A. ENABLE 22 BIT ADDRESSING MODE 

B. CLEAR ADDRESS 0 

C. WRITE PHYSICAL ADDRESS 17000000 WITH ALL ONES 
0 CHECK ADDRESS 0 

IF ADDRESS 0 IS UNCHANGED (-0) OR A TIME OUT OCCURRED. IT INDICATES 
22 BIT MODE IS FUNCTIONING. 
{IF ADDRESS 0 -177777 IT INDICATES THAT 22 BIT MODE IS NOT FUNCTIONING. 



014414 


013767 


000004 


164406 100 »: 


MOV 


S«4.SL0C00 


{SAVE VECTOR 


014422 


013767 


000006 


164402 


MOV 


8«6.SL0C01 


sSAVE VECTOR 


014430 


012737 


014514 


000004 


MOV 


«1«.S«4 


J SET VECTOR FOR NXM TRAP 


014436 


012737 


000340 


000006 


MOV 


«340.8«6 


IeNABLE 22 BIT MODE ADDRESSING 


014444 


012767 


000020 


156044 


MOV 


*20.SR3 


014452 


012767 


170000 


155674 


MOV 


4170000. KIPAR6 


(SET KIPAR6 FOR 1920-1924KW ADDR RANGE 


014460 


012767 


000001 


163104 


MOV 


«1.SR0 


! ENABLE MMU 


014466 


005067 


163306 




CLR 


0 


i CLEAR ADOR 0 


014472 


012737 


177777 


140000 


MOV 


•177777, B«140000 


J MOVE ALL ONES TO ADDR 17000000 VIA KIPAR6 












:A TIME OUT ERROR OR 


014500 


005767 


163274 




TST 


0 


iADOR 0 REMAINING CLEAR INDICATES 

<THAT 22 BIT ADDRESS MODE IS WORKING AND 

tTHAT SOME FURTHER TESTS SHOULD BE PfcR»'ORMED 


014504 


001407 






BEQ 


21 


(IF ADDR 0 -177777 

(ERROR! 22 BIT ADDRESS MODE BAD 


014506 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


014510 


000250 






.WORD 


250 


(UNIQUE ERROR NUMBER 


014S12 


001213 






.WORD 


MMUERR 


(ADDRESS OF ERROR MESSAGE 



GLOBAL AREAS HACUl 30A(1052) 20 
KOJIIA.MAC 20 -MAR -84 11:19 



-04 11:31 PAGE 60 

T22 TEST 22/18 BIT ADDRESS OPTION 



SEQ 0060 



5005 
5006 
5007 
5008 
5009 
3010 
50*1 
5012 
3015 
5014 
3015 
3016 
3017 
3018 
5019 
3020 
3021 
5022 
3023 
3024 
3025 
3026 
3027 
3028 
5029 
3030 
3051 
3052 
3053 
3034 
3055 
3036 
3037 
3058 
3039 
3040 
3041 
5042 
5043 
3044 
5045 
3046 
3047 
3048 
3049 
3050 
3051 
3052 
3053 
5054 
3055 
3056 
3057 
3056 
3059 
5060 



014514 


012706 


001000 




It: 


MOV 


♦STBOT.SP 


J GOT HERE AS A RESULT OF NXM TRAP 


014520 


005057 


Iff fW> 








OA1 777AA 


1 CLEAR CPU ERROR REGISTER 


014524 


012757 


014364 




c9 : 


nuv 




1 be 1 UK VcL 1 UH r UH NaFI I KHP 




^^^^ 

042'07 


OUOVcO 






OIL 




• CP r iA QTT unnopccTih^ Mtmc Tkj cdt 
t be 1 io Dl 1 HUUHcbbinb nuuc iri bn^ 




Olc/o' 


I fVOVO 






nuv 




tBE ASSERTED IF 22 BIT ADR UAS ENABLED 




012737 


* 7T7T^ 






nuv 


A1 77777 aikiA<v%nn 

W\fftff »Qlvl4UUvU 


> TDv xn uoTTP Anno 1 7rt/>A/w> uta i^tdad^ 

5 IKT lU ■•Kilt HUUK I f l/UUUvU ViH K IKHHO 
• iinnD f\ CMHI ■ n ■ 177777 A T TK^ Ai IT 
















1 7777T 










• OQ Anno c\ m 7FDn TunTr^ATPc akj coono 




001405 








BEQ 


41 


;G0 TO NEXT TEST IF ADDR 0-177777 


014564 


005067 


163002 




5(: 


CLR 


SRO 


J DISABLE MMU BEFORE ERROR. 

lERRORf 18 BIT ADOR OPTION IS N.G. 


014570 


104000 








ERROR 




sALL ERRORS TO TRAP TO EMT VECTOR 


014572 


000251 








.UORD 


251 


{UNIQUE ERROR NUHBER 


014574 


001215 








.WORD 




; ADDRESS OF ERROR HESSAGE 



{TEST ADDRESS BITS 18 THRU 21 



014576 


052767 


000020 


155712 


4t: 


BIS 


«6IT04.SR3 


(ENABLE 22 BIT ADDRESSING MODE 


014604 


012767 


014652 


165172 




MOV 


«5( .4 


(SET UP FOR NXM TRAP 


014612 


005067 


165162 






CLR 


0 


(CLEAR ADDRESS 0 


014616 


012767 


010000 


155550 




MOV 


« 10000. K IP AR6 


(TEST ADDRESS BIT 18 


014624 


012757 


177777 


140O00 




MOV 


♦177777, S«140000 


(WRITE ALL ONES TO ADOR 1000000 


014652 


005767 


163142 






TST 


0 


(TEST ADDRESS 0. SHOULD - ZERO 


014656 


001405 








BEQ 


5« 


(BRANCH IF ADDRESS 0*0 


014640 


005067 


162726 






CLR 


SRO 


(DISABLE MMU BEFORE ERROR 


014644 


104000 








ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


014646 


000252 








.WORD 


252 


(UNIQUE ERROR NUMBER 


014650 


001215 








.WORD 


MMUERR 


(ADDRESS OF ERROR MESSAGE 














i ERROR! 


BIT 18 DID NOT ASSERT 


014652 


012737 


014720 


000004 


5»: 


MOV 


«6».a«4 


(SET UP FOR NXM TRAP 


014660 


005067 


163114 






CLR 


0 


(CLEAR ADDR 0 


014664 


012767 


020000 


155462 




MOV 


420000, K IP AR6 


(TEST ADDRESS BIT 19 


014672 


012757 


177777 


140000 




MOV 


•177777.M140000 


(WRITE ALL ONES TO ADDR 2000000 


014700 


005767 


165074 






TST 


0 


(TEST ADOR 0. SHOULD- ZERO 


014704 


001405 








BEQ 


6» 


(BRANCH IF ADDRESS 0-0 


014706 


005067 


162660 






CLR 


SRO 


(DISABLE MMU BEFORE ERROR 


014712 


104000 








ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


014714 


000253 








.WORO 


253 


(UNIQUE ERROR NUMBER 


014716 


001213 








.WORD 


MMUERR 


(ADDRESS OF ERROR MESSAGE 














(ERROR! 


BIT 19 DID NOT ASSERT 


014720 


012757 


014766 


000004 


6«: 


MOV 


«7»,S«4 


(SET UP FOR NXM TRAP 


014726 


005067 


163046 






CLR 


0 


(CLEAR ADOR 0 


014752 


012767 


040000 


155414 




MOV 


»40000,KIPAR6 


(TEST ADDRESS BIT 20 


014740 


012757 


177777 


140000 




MOV 


•17777 7,80140000 


(WRITE ALL ONES TO ADOR 4000000 


014746 


005767 


163026 






TST 


0 


(TEST ADOR 0. SHOULD -0 


014752 


001405 








BEQ 


7» 


(BRANCH IF ADDRESS 0 -0 


014754 


005067 


162612 






CLR 


SRO 


(DISABLE MMU BEFORE ERROR 


014760 


104000 








ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


014762 


000254 








.WORD 


254 


(UNIQUE ERROR NUMBER 


014764 


001215 








.WORD 


MMUERR 


(ADDRESS OF ERROR MESSAGE 














(ERROR! 


BIT 20 DID NOT ASSERT 


014 766 


012757 


015034 


000004 


7»: 


MOV 


•6t.a«4 


(SET UP FOR NXM 


014774 


005067 


163000 






CLR 


0 


(CLEAR ADDRESS 0 



J 5 

GLOBAL AREAS MACtH 30AC1052) 20 MAR 64 11:51 PAGE 61 OtO •,<■ 

KOJllA.MAC 20 MAR 04 11:19 T22 TEST 22/18 BIT ADDRESS OPTION 



5061 


015000 


012767 


100000 


155346 




MOV 


#100000. KIPAR6 




iTEST ADDRESS BIT 21 


3062 


015006 


012737 


177777 


140000 




MOV 


#177777, 8#140000 




(WRITE ALL ONES AT ADDR 10000000 


5065 


015014 


005767 


162760 






TST 


0 




; CHECK ADDRESS 0. SHOULD « 0 


5064 


015020 


001405 








BEQ 


8« 




J BRANCH IF ADDR 0-0 


3065 


015022 


005067 


162544 






CLR 


SRO 




(DISABLE MMU BEFORE ERROR 


5066 


015026 


104000 








ERROR 






J ALL ERRORS TO TRAP TO EMT VECTOR 


5067 


015030 


000255 








.WORD 


255 




(UNIQUE ERROR NUMBER 


5069 


015032 


001213 








.UORO 






(ADDRESS or ERROR MESSAGE 


5069 
















ERROR 


! ADDR BIT 21 DID NOT ASSERT 


5070 


015054 


005067 


162552 




8«: 


CLR 


SRO 




(DISABLE MMU 


5071 


015040 


005057 


177766 






CLR 


a#l 77766 




(CLEAR CPU ERROR REGISTER 


3072 


015044 


012706 


001000 






MOV 


#STB0T.R6 




(RESET STACK POINTER 


3073 


015050 


015737 


001030 


000004 




MOV 


MSLOCOO , 8#4 




(RESTORE VECTORS 


3074 


015056 


013737 


001032 


000006 




MOV 


8«SL0C01.8«6 




1 


5075 
5076 


015064 








TSMM14 










5077 




















5078 










!*TEST 


23 


AOOER RELOCATION 


TEST 


PART B 


5079 












3080 










1 1 NtcU 


OTTC 

dd bilb 


OF MEMORY ADDRESSING ) 




3081 




















3082 


015064 








TC T*^* . 










3083 


015064 


005267 


163714 








• TtSTN 




jiNLHtntNl Itbl NUnbtK 


5084 


015070 


005037 


177572 






Pi D 






. Ti f)trc MM 1 
{ 1 uwri \^ r nnu • 


3085 


015074 


005067 


162666 






LLH 






• Pi CflD TLiC PDl 1 CDOnO DCPTCTCD 
; LLtMH 1 nt L"U CKHUK Kculb 1 tn 


3086 


015100 


013757 


000004 


001030 




nuv 


OwA , BvSLOCOO 




. CAWC \ nP A Tiki CI nPAA 
1 3HVC LUC ^ IN 9LUCUU . 


3087 


015106 


015737 


000006 


001032 




nuv 


8*6 (BOSLOCOl 




t bHVc. LUL D in !>LUUV/Jl « 


3088 


015114 


012757 


015620 


000004 




nuv 


•NXnTHK, v«4 




. CC T 1 O CnO T TMCn* IT TD AD 
{ bt 1 UP r UK 1 intUU 1 1 KMK 


3089 


015122 


012737 


000340 


000006 




nuv 


•340, 8*6 




. CCT 1 iO CAD TTMCDl IT TDAD 


5090 


015130 


005037 


172340 












. CC T If CD DAD A CAD 1 CT AWiJ AC MCMf^V 


3091 


01S1S4 


012767 


077406 


155136 




MOW 

nuv 


wit ^s^a • A~ www 




• CC T I^CD Dr\D CAD At^iJ D/LJ UPPCCC 
S DC 1 MlK KUK r UK 4I\W H/m Hi.LC.9b • 


3092 


015142 


012737 


177500 


172554 




MOV 


«177SOO.0«KIPAR6 




i^ET UP KERNEL PAGE ADDR REG 6 


5095 


















(FOR HIGHEST 4K WORDS OF NON-I/O 


3094 


















(FOR 2 MEG WORDS OF MEMORY. 


3095 


015150 


012767 


077406 


155136 




MOV 


«77406.KIP0R6 




(SET KER P0R6 FOR 4KW R/W ACCESS. 


5096 


015156 


012737 


000020 


172516 




MOV 


«20.a«SR3 




(ENABLE 22 BIT ADDRESSING. 


3097 


015164 


012737 


000001 


177572 




MOV 


•1,8*SR0 




(TURN ON THE MMU, 


3098 


0151/2 


0057S7 


157776 






TST 


8»157776 




(ATTEMPT TO ADDRESS LAST MEMORt ADDR. 


3099 














UILL TRAP TO 4 IF 


2 MEG 




3100 


015176 


013737 


001030 


000004 




MOV 


84SLOC00.8«4 




(RESTORE LOC 4 


3101 


015204 


013737 


001032 


000006 




MOV 


8«SL0C01.S«6 




(RESTORE LOC 6 


3102 


015212 


005037 


177572 






CLR 


84177572 




(MMU OFF 


3105 


015216 


005037 


001042 






CLR 


8«fLAG 




(CLEAR MMU ABORT FLAG 


5104 


015222 


004767 


164060 






JSR 


PC.MMU 




(INIT MMU 


5105 


015226 


012737 


010000 


177776 




MOV 


♦10000. 8«177776 




(INIT PSU 


3106 


015234 


012737 


000020 


172516 




MOV 


«20.»#1 72516 




(INIT MMR3 


3107 


015242 


052737 


001000 


177746 




BIS 


#1000. 8«1 77746 




(TURN CACHE TEST FEATURE ON 


3108 


015250 


012704 


016022 






MOV 


«PARVA3.R4 




(SET POINTERS TO INIT TABLES 


3109 


015254 


012701 


016054 






MOV 


#VIR5.R1 






3110 


015260 


012437 


172246 




11: 


MOV 


CR4).,8#1 72246 




(INIT SIPAR3 


5111 




012737 


OOOOOl 


177572 




MOV 


♦1.8«177572 




(TURN MMU ON 


3112 


015272 


012746 


125252 






MOV 


♦125252. (SP) 




(PUSH BACKGROUND DATA ON TO THE STACK 


3113 


015276 


006671 


000000 






MTPI 


SOCRl) 




(WRITE DATA TO PHYSICAL ADDRESS 


5114 


015302 


006551 








MTPI 


8(R1)* 




(WRITE DATA AT PHYSICAL ADDRESS TO STACK 


3115 


015304 


022726 


125252 






CMP 


•125252. CSP)* 




(IS DATA EQUAL TO EXPECTED 


3116 


015310 


001405 








BEQ 


2< 




(YES CO ON 



GLOBAL ARE A3 
KOJllA.MAC 



MAC til 30A(105^) 
20-MAR 84 11:1<» 



20 nAR 84 

T23 



11:31 PAGE 62 

ADDER RELOCATION TEST PART 8 



Dill 


A1 CXI o 


AACAX7 


1 77C73 
If f 3 f C 


3110 


A1 CXI & 

U13510 






51 1** 


U135eU 


0UUe30 




3l£V 




AA1 Ol X 




3l<rl 








31cc 


A1 CXOA 


AACAX7 


1 77S70 
1 1 » 3 ' c 


T 1 ox 


U1355V 


A01 A07 


AAAXXX 


%1 OA 


A1 CXXA 
V15554 


001351 




dlc3 


A1 CXXiL 
U13550 


A1 07AA 
Wlc »U4 


A1 S7AA 
vl3 # 




A1 CXAO 
01354C 


A1 07rt1 
Ule 'VX 


A1 <«Ai«0 
U1303e 


Olc f 


A1 CXA^ 
U1354ei 


A1 OA XI 
Ulc45X 




31eO 


V1353U 


A01 1 07 


AAAXXX 


Tl OO 


f\t CXCA 
V13534 


AA1 X7A 

A1 O^ftA 
vie • W4 






rtl SX<«ik 
vl3530 


01 S77A 
VX3 » ' V 


X\ XI 


A1 CXAO 


A1 07A1 

Vie 'VI 


A1 ^7X4\ 
VXD r ->0 


XI xo 

515c 


A1 CXiLi^ 
U13500 


01 0700 
vie ' Vc 


A1 tAOO 


XI XX 

5155 


m CX70 


UXc r v5 


A1&ASA 
VXOV^t 


XI XA 
5154 


U135 'O 


W4 »0 • 


AAAA7A 


XI X^ 

5153 








XI XA 

dl50 








XI X7 

515 r 








XI XA 

5150 


m SAAS 
vX34VC 


ftOl 1 37 
VcX Xc ' 


AAA1 1 1 
V\^XXX 


XI XQ 

dl57 








XI 40 
51HU 


Ul j4UO 


AAI X7X 




XI 41 


m SA 1 n 

VXD** lU 


<V)S3m 
VV3cvX 




Xiao 

51Hc 


vl34 Ic 


AACOA1 
VA^3eUl 




XI AX 


m SA1 A 


AACOAA 




XI AA 


A1 CA1 ^ 


AACOAA 




XI A^ 


Al SAOA 
V/134eU 


A 1 07X7 
Ulc ' 5 f 


fW^A37 


XI AA 


A1 SAOiL 
vl j4iO 


A1 OAX7 
Ulc4 5 f 


I 7777<L 

II 1 f f O 


XI A7 


A1 CAXO 


A 1 O 7A£ 
Ulc »40 


AC3COS 


XI Afl 

5140 


At CAXiL 
V13450 


A1 07X7 

Vie lo 1 


AAAAA1 
UUUUUl 


XI AQ 


A1 SAAA 


1 AAJLX1 

moo5i 






A1 CAAA 


AnCAX7 
\Ai3v5 1 


1 77C70 


XI m 


m CASo 


Af 37X7 
Ule r 5r 


AAAAOA 


XI SO 


A1 CA<U1 


AAA7e7 
W#4 fO f 


AAAAAA 

00004U 


X1SX 








XI SA 
5134 








XI SS 


A1 CAAA 
UX J404 


AACAX7 
UU3V5 1 


1 7 OC 1 
1 'C310 


XI lUl 
5130 


n 1 CA 70 


AAA 7e.7 
vV4 ro f 


AAAAAA 










XI SA 

0130 








XI («Q 

OX37 








XIAO 








XI A1 


t\ 1 SA 7A 


AAA1 A7 


0UO4VIO 


















X16A 
























3167 


015500 


0124S7 


177776 


3166 


015504 


012737 


000001 


3169 


015512 


012746 


052525 


3170 


015516 


006631 




3171 


015520 


005037 


177572 


3172 


015524 


012737 


010000 



2S: 



St: 



4»: 



172516 
177572 
172516 



CLR 8*1 7 7572 
ERROR 

. WORD 256 

.WORD MMUERR 



CLR a#177572 

CMP (R4).«333 

BNE 1( 

MOV •PARVA2.R4 

MOV »PARAD2,R1 

MOV CR4)».a(Rl). 

CMP (Rl).»333 

BNE It 

MOV *M0DE2.R4 

MOV «VIR2.R1 

MOV •PARVA3.R2 

MOV *VIR3.R3 

JSR PC.TS14 



CMP CRD. #111 

BNE 4» 

INC Rl 

INC Rl 

INC R4 

INC R4 

MOV »27,a#l72516 

MOV (R4)». 8*177776 

MOV #52525. -CSP) 

MOV »1. Ml 775 72 

MTPO 8(R1)» 

CLR 8*177572 

MOV «20.8«172516 

JSR PC.T14 



CLR 8«172516 
JSR PC,TS14 



JMP T14FIN 



J TURN MMU OFF 

;ALL ERRORS TO TRAP TO EMT VECTOR 
i UNIQUE ERROR NUMBER 
s ADDRESS OF ERROR MESSAGE 
;N0T EQUAL GO TO ERROR 
jTURN MMU OFF 
I ARE UE DONE 
:N0 GO TO It 

J SET POINTERS TO PAR INIT TABLES 

IlNIT PARS 
:ARE UE DONE 
tNO. GO TO 3$ 

8 SET POINTERS TO ADDER PART B TABLES 



WRITE DATA TO PHYSICAL ADDRESS AND THEN 
CHECK IF DATA AT PHYSICAL ADDRESS IS 
EQUAL TO EXPECTED AND IF NOT DETERMINE 
IF IT IS AN ADDER ERROR OR A MEMORY ERROR 
HAVE UE DONE ALL THE 22 BIT MODE I SPACE 
(CASES 

:N0 GO TO 4$ 

sPOINT TO 22 BIT MODE D SPACE CASE 



INIT MMR3 
INIT PSW 

PUSH DATA ONTO STACK 
TURN MMU ON 

WRITE DATA TO PHYSICAL ADDRESS 
TURN MMU OFF 
INIT MMR3 

CHECK IF DATA AT PHYSICAL ADDRESS IS EQUAL 
TO EXPECTED AND IF NOT DETERMINE IF IT 
IS AN ADDER ERROR OR A MEMORY ERROR 
INIT MMR3 FOR IB BIT MODE 
WRITE DATA TO PHYSICAL ADDRESS AND THEN 
CHECK IF DATA AT PHYSICAL ADDRESS IS 
EQUAL TO EXPECTED AND IF NOT DETERMINE IF 
IT IS AN ADDER ERROR OR A MEMORY ERROR 



{ROUTINE TO WRITE DATA TO PHYSICAL ADDRESS AND TO CHECK IF DATA AT 
PHYSICAL ADDRESS IS EQUAL TO EXPECTED AND IF NOT DETERMINE IF IT IS 
AN ADDER ERROR OR A MEMORY ERROR 



TS14: MOV (R4)» . 8*177776 

177572 MOV ♦1.8*177572 

MOV *52525.-(SP) 

MTPI 8(R1)» 

CLR 8*177572 

177776 T14: MOV *10000, 8*1 77776 



tINIT PSW 

tTURN MMU ON 

{WRITE DATA ONTO STACK 

{WRITE DATA TO PHYSICAL ADDRESS VIA STACK 
(TURN MMU OFF 
{INIT PSW 



Lb 



GLOBAi 



5175 
5174 
5175 
5176 
5177 
5178 
5179 
518C 
3181 
3182 
3185 
5184 
3185 
5186 
5187 
5188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
5207 
3208 
5209 
5210 
3211 
3212 
3213 
3214 
5215 
3216 
5217 
5218 
5219 
5220 
5221 
3222 
5223 
5224 
3225 
5226 
3227 
3226 



AREAS 


MACUl 


50AC 1052 ) <>0 MAR 84 


11:51 PAGE 65 


MAC 20 HAR 84 


11:19 T25 


ADDER 


HFLOCATION TEST 1 




• '5 T T 


172246 


MOV 


(R2)*.a«l 72246 




(\% 07X7 
Ulc ' 0 ' 


000001 177572 


MOV 


♦1.W177572 






000000 


MFPI 


90(R5) 




/\0^70Si 


052525 


CMP 


♦52525. (SP)» 




A/\1 A 1 A 
Uvl^ 1^ 




BEQ 


2< 


015556 


006573 


000000 


MFPI 


90(R3) 


015562 


022726 


125252 


CMP 


*125252.(SP)» 








DwU 










ERROR 










.WORD 


257 








.UORO 


MMUERR 


015576 


000405 




BR 


2$ 






If: 












ERROR 










.WORD 


260 


015604 


001213 




.UORO 


MMUERR 


015606 


005057 


177572 2$: 


CLR 


a«l 77572 


015612 


005205 




INC 


R3 


015614 


005203 




INC 


R3 


015616 


000207 




RTS 


PC 



}E0 0065 



;IT 



!IT 



ilNIT SIPAR5 

J TORN MMU ON 

iDO RELOCATION 

sis DATA EQUAL TO EXPECTED 

lYES GO ON 

J WHAT TYPE OF ERROR IS IT 

t 

i 

a ALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
IS A MEMORY ERROR 



;ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
IS AN ADDER ERROR 
(TURN MMU OFF 



sNON-EXiSTANT MEMORY TRAP ROUTINE 



015620 
015624 
015630 
015636 
015644 



005037 
012716 
013737 
013737 
005037 



177572 
016106 

001030 000004 
001032 000006 
177766 



015650 000006 



NXMTRP: CLR 
MOV 
MOV 
MOV 
CLR 

RTT 



S«SRO 

♦T14FIN.CSP) 
S«SL0C00.B«4 
S«SL0C01.8«6 
9«177766 



(RETURN 



(TURN OFF MMU. 

(SET UP STACK WITH RETURN ADDR . 
(RESTORE LOC 4 
(RESTORE LOC 6 

(CLEAR TIME OUT INDICATION FROM 

(CPU ERROR REGISTER. 

(RETURN FROM TRAPs GO TO NEXT TEST. 



i ADDER TEST PART B TABLES 



015652 


177646 


PARA02: 


.WORD 


177646 


015654 


177650 




.WORD 


177650 


015656 


177652 




.UORD 


177652 


015660 


172240 




.WORD 


172240 


015662 


177640 




.WORD 


177640 


015664 


177642 




.WORD 


177642 


015666 


172244 




.WORD 


172244 


015670 


177644 




.WORD 


177644 


015672 


172252 




.WORD 


172252 


015674 


172352 




.WORD 


172352 


015676 


177662 




.WORD 


177662 


015700 


172242 




.WORD 


172242 


015702 


000333 




.WORD 


353 


015704 


157700 


PARVA2: 


.WORD 


157700 


015706 


137700 




.WORD 


157700 


015710 


077700 




.WORD 


077700 


015712 


176777 




.WORD 


176777 


015714 


007600 




.WORD 


007600 


015716 


167700 




.WORD 


167700 


015720 


175700 




.WORD 


175700 


015722 


177425 




.WORD 


177425 



Mb 

GLOBAL ARfAS riACni 30A(1052) ^0 MAR 84 11:51 PAGE 64 

KOJllA.MAC 20 MAR 84 11:19 T25 ADDER RELOCATION TEST PART B 



5229 


015724 


177220 




.UORO 


177220 


5230 


015726 


173700 




.WORD 


173700 


5251 


015730 


176700 




.UORO 


176700 


52S2 


015732 


077400 




.WORD 


077400 


5233 


01! 734 


000333 




.UORD 


555 


32S4 


015736 


070000 


VIR2: 


.WORD 


070000 


3235 


015740 


110000 




.UORD 


I 10000 


3236 


015742 


130000 




.UORD 


150000 


5237 


015744 


000000 




.UORD 


000000 


3238 


015746 


000000 




.UORD 


000000 


3239 


015750 


050000 




.UORD 


050000 


3240 


015752 


050000 




.UORD 


050000 


3241 


015754 


052524 




.UORD 


052524 


3242 


015756 


136000 




.UORD 


156000 


3245 


015760 


150000 




.UORD 


150000 


5244 


015762 


000111 




.UORD 


111 


5245 


015764 


050000 




.UORD 


030000 


5246 


015766 


050000 




.UORD 


050000 


3247 


015770 


050000 


H00E2: 


.UORD 


030000 


5248 


015772 


050000 




.UORD 


030000 


5249 


015774 


050000 




.UORD 


030000 


5250 


015776 


010000 




.UORD 


010000 


5251 


016000 


050000 




.UORD 


030000 


5252 


016002 


050000 




.UORD 


050000 


5255 


016004 


010000 




.UORD 


010000 


5254 


016006 


050000 




.UORO 


030000 


5255 


016010 


010000 




.UORD 


010000 


5256 


016012 


000000 




.UORO 


000000 


5257 


016014 


000111 




.UORD 


111 


5258 


016016 


050000 




.UORD 


030000 


5259 


016020 


010000 




.WORD 


010000 


5260 


016022 


160000 


PARVA3: 


.UORD 


160000 


5261 


016024 


140000 




.UORD 


140000 


5262 


016026 


100000 




.UORD 


100000 


5265 


016030 


176770 




.UORD 


176770 


5264 


016032 


007600 




.UORO 


007600 


5265 


016034 


170000 




.UORD 


170000 


5266 


016036 


176000 




.UORD 


176000 


5267 


016040 


177552 




.UORD 


177552 


5268 


016042 


177400 




.UORD 


1 77400 


5269 


016044 


174000 




.UORD 


174000 


5270 


016046 


177000 




.UORD 


177000 


5271 


016050 


007500 




.UORD 


007500 


5272 


016052 


000335 




.UORO 


355 


5275 


016054 


060000 


V1R3: 


.UORO 


060000 


5274 


016056 


060000 




.UORD 


060000 


5275 


016060 


060000 




.UORD 


060000 


5276 


016062 


060700 




.UORO 


060700 


5277 


016064 


060000 




.U09D 


060000 


3278 


016066 


060000 




.UORD 


060000 


3279 


016070 


060000 




.UORD 


060000 


5280 


016072 


060024 




.UORD 


060024 


5281 


016074 


060000 




.UORD 


060000 


5282 


016076 


060000 




.UORD 


060000 


5283 


016100 


060000 




.UORD 


060000 


3284 


016102 


06C000 




.UORO 


060000 



N5 



GtOeAL AREAS 
KDJllA.MAC 



MACtll 30A(1052) 
20 -MAR 64 li:l9 



20 MAR 64 
T23 



65 



11:31 PAGE _. 

ADDER RELOCATION TEST PART B 



S£Q nob'j 



5265 


016104 


0OO33S 




3286 








3267 








3286 








3269 


016106 






3290 








3291 








3292 








5293 








3294 








3295 








3296 








3297 








3298 


016106 






3299 


016106 


005267 


162672 


3300 


016112 


004767 


163170 


3301 


016116 


012737 


177400 


3302 


016124 


016767 


161654 


3303 


016132 


016767 


000026 


3304 


016140 


052767 


000001 


3305 


016146 


005067 


161614 


3306 


016152 


005067 


161620 


3307 


016156 


005737 


157776 


3308 


016162 


000423 




3309 








3310 








3311 


016164 


022767 


000040 


3312 


016172 


001403 




3313 


016174 


104000 




3314 


016176 


000261 




3315 


016200 


001213 




3316 


016202 


022726 


016162 


3317 


016206 


001403 




3318 


016210 


104000 




3319 


016212 


000262 




3320 


016214 


001213 




3321 


016216 


022726 


000000 


3322 


016222 


001403 




3323 


016224 


104000 




3324 


016226 


000263 




3325 


016230 


001213 




3326 


016232 


005067 


161334 


3327 


016236 


005067 


161524 


3328 


016242 


016767 


162562 


3329 








3330 








3351 


016250 






3332 








3353 








3334 








3335 


016250 






3336 


016250 


005267 


162530 


3337 


016254 


005037 


177572 


3338 


016260 


005067 


162556 


3339 


016264 


004767 


163016 


3340 


016270 


005037 


177776 



.WORD 333 



T14FIN: 



J ♦TEST 24 



TEST NON-EXISTANT MEMORY TRAP 



:UE ARE ASSUMING THAT THE NON EXISTANT MEMORY TIME OUT 
:rEATURE IS WORKING SINCE UE CAN' T GUARANTEE THAT 
;THE SYSTEM BEING TESTED HAS A NON-EXISTANT MEMORY LOCATION, 
I AT THIS TIME UE MILL ATTEMPT TO TEST THE NXM FUNCTION 



TST24; 



172354 
162676 
161644 
161424 



1$: 



INC 
JSR 
MOV 
MOV 
MOV 
BIS 
CLR 
CLR 
TST 
BR 



161574 2$ 



161534 



CMP 
BEQ 
ERROR 
.WORD 
.WORD 
3$: CMP 
BEQ 
ERROR 
.UORD 
.WORD 
4$: CMP 
BEQ 
ERROR 
.UORD 
.WORD 
NXMFIN: CLR 
CLR 
MOV 



$TESTN 
PC.MMU 

#177400. S«K IP AR6 

4.SL0CO0 

2*.4 

«BIT00.SR0 

CPEREG 

PS 

8*157776 
NXMFIN 



«6IT05, CPEREG 
3$ 

261 

MMUERR 

♦1».(SP)» 

4» 

262 

MMUERR 

•O.CSP)* 

NXMFIN 

263 

MMUERR 
SRO 

CPEREG 
SL0C00,4 



I INCREMENT TEST NUMBER 
jINIT THE MMU 

SET KIPAR6 TO RELOCATE TO HIGHEST MEMORY 
SAVE VECTOR 

LOAD VEC UITH ADDR OF TRAP HANDLER 
TURN ON THE MMU 
CLEAR THE CPU ERROR REGISTER 
CLilAR The psu 

ACCESS PHYSICAL ADDR 17757776 
IF IT DOESN'T TRAP WE'LL ASSUME 
THAT THIS lA A 4 MEGABYTE SYSTEM 
AND GO TO THE NEXT TEST 
IS CPU ERROR REGISTER CORRECT? 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

IS CONTFNTS OF STACK CORRECT? 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

IS CONTENTS OF STACK CORRECT? 

iALL ERRORS TO TRAP TO EMT VECTOR 
: UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

TURN OFF THE MMU 

CLEAR THE CPU ERROR REGISTER 

RESTORE THE VECTOR 



TSMM15! 

J' 



J •TEST 25 
TST25: 



PAGE WRITTEN BIT TEST 



INC 
CLR 
CLR 
JSR 
CLR 



»TESTN 

80177572 

FLAG 

PC.MMU 

8#177776 



.INCREMENT TEST NUMBER 
;MMU OFF 

{CLEAR MMU ABORT FLAG 
jINIT MMU 
sINIT PSU 



GLOBAL AREAS 
KOJllA.NAC 



NACtll S0A(1052) 
^0 nAR 64 11:19 



B6 

?0 HAR 84 11:51 PAGE 66 

T25 PAGE WRITTEN BIT TEST 



SS41 


0162 74 


012704 


172500 






nov 


•172500. R4 


5542 


016500 


004767 


000114 






JSR 


PC,TS15 


5S45 














5544 
















S545 


016504 


004767 


000164 






JSR 


PC.T15 


5346 
















554' 
















5548 


016510 


012757 


050000 


177776 




MOV 


•50000. S41 77 776 


5544 


016516 


012704 


172200 






nov 


•1 72200. R4 


5550 


016522 


004767 


000072 






JSR 


PC.TS15 


5551 
















5552 
















5555 


016526 


00476 7 


000142 






JSR 


PC.T15 


5554 
















5555 
















5556 


016552 


005057 


177776 






CLR 


8*177776 


5557 


016556 


012757 


170000 


177776 




MOV 


• 170000. Ml 77776 


5556 


016544 


012704 


177600 






MOV 


•177600. R4 


5559 


016550 


004767 


000044 






JSR 


PC.TS15 


5560 
















5561 
















5562 


016554 


004767 


000114 






JSR 


PC.T15 


5565 














5564 
















5565 


016560 


005057 


177776 






CLR 


8^177776 


5566 


016564 


012704 


172500 






MOV 


•1 72500. R4 


5567 


016570 


004767 


000162 






JSR 


PC.T15A 


5568 














5569 
















5570 


016574 


012704 


172200 






MOV 


•1 72200. R4 


5571 


016400 


004767 


000152 






JSR 


PC. T15A 


5572 














5575 
















5574 


016404 


012704 


177600 






MOV 


•1 77600. R4 


5375 


016410 


004767 


000142 






JSR 


PC. T ISA 


5376 














5577 
















5576 
















5579 


016414 


000167 


000170 






JMP 


T15FIN 


5580 










1 






5361 










iROUTINE TO 00 RELOCATIONS AND TEGT 


5582 










iSET 


AND ir NOT 


SET REPORT AN ERROR 


5565 
















5564 


016420 


005001 






TS15: 


CLR 


Rl 


5565 


016422 


012757 


000020 


172516 




MOV 


•20.8*172516 


5566 


016450 


012757 


000001 


177572 


1<: 


MOV 


•1.8#177572 


5567 


016456 


011111 








MOV 


(Rl).CRl) 


5566 


016440 


005057 


177572 






CLR 


8#177572 


5569 


016444 


022427 


077506 






CMP 


(R4)..^77506 


5590 


016450 


001405 








BEG 


2t 


5591 


016452 


104000 








ERROR 


5592 


016454 


000264 








.UORD 


264 


5395 


016456 


001215 








.UORO 


MMUERR 


3594 














iNO 


5395 


016460 


062701 


020000 




2»: 


ADD 


•20000. Rl 


5396 


016464 


020127 


160000 






CMP 


R 1.^160000 



I SET POINTER TO KPORS 

lOO RELOCATIONS AND TEST KIPORS rOR 

I PAGE WRITTEN BIT BEING SET AND IF 

I NOT SET GO TO ERROR 

iDO RELOCATIONS AND TEST KQPORS FOR 

iPAGE WRITTEN BIT BEING SET AND IF NOT 

I SET GO TO ERROR 

ilNIT PSU 

I SET POINTER TO SPORS 
iDO RELOCATIONS AND TEST SIPDRS FOR 
iPAGE WRITTEN BIT BEING SET AND IF NOT 
I SET GO TO ERROR 

I DO RELOCATIONS AND TEST SOPORS FOR 

(PAGE WRITTEN BIT BEING SET AND IF NOT 

I SET GO TO ERROR 

lINIT PSW TO A KNOWN STATE 

iINIT PSW 

I SET POINTER TO UPORS 

I DO RELOCATIONS AND TEST UlPDRS FOR 

(PAGE WRITTEN BIT BEING SET AND IF 

I NOT SET GO TO ERROR 

iDO RELOCATIONS AND TEST UDPORS ^ OR 

iPAGE WRITTEN SIT BEING SET AND IF NOT 

I SET GO TO ERROR 

lINIT PSW TO A KNOWN STATE 

I SET POINTER TO KPDRS 

•EXPLICITLY WRITE TO KPORS AND TEST 

|FOR PAGE WRITTEN BIT BEING CLEARED 

I AND IF NOT CLEARED GO TO ERROR 

I SET POINTER TO SPDRS 

tCXPLlCITLY WRITE TO SPDRS AND TEST 

|F0R PAGE WRITTEN BIT BEING CLEARED 

I AND IF NOT CLEARED GO TO ERROR 

I SET POINTER TO UPORS 

lEXPLICITLt WRITE TO UPORS AND TEST 

iFOR PAGE WRITTEN BIT BEING CLEARED 

lANO IF NOT CLEARED GO TO ERROR 



IPDRS FOR PAGE WRITTEN BIT BEING 



I SET POINTER TO VIRTUAL ADDRESS 
iINIT MMR5 
J TURN MMU ON 
iDO A RELOCATION 
I TURN MMU OFF 

lis DATA EQUAL TO EXPECTED 
tOK GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
i UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
GO TO ERROR 

iPOINT TO NEXT VIRTUAL ADDRESS 
I ARE WE DONE 



l40eAt ARLi 
KDJllA.MAC 



As 



C6 



5S«>e 
ss«w 

5400 
3401 
340^ 



5420 
5421 
5422 
5425 
5424 
5425 
5426 
5427 
5420 
5429 
5430 
54SI 
54 52 
54 3 5 
5454 
5435 
5456 
5457 
5458 
5459 
5440 
5441 
5442 
5443 
5444 
5445 
5446 
5447 
5446 
5449 
5450 
545: 
3452 



0164 70 00155^ 
016472 000207 



8VI 



TO 1« 



iROUTINE TO DO RELOCATIONS AND TEST OPDRS FOR PAGE WRITTEN BIT BEING SET 
I AND IF NOT SET REPORT AN ERROR 



3405 


0164 74 


005001 






T15: 


CLR 


Rl 


iSET POINTER TO VIRTUAL ADDRESS 


5404 


016476 


062704 


000002 






ADO 


•2.R4 


1 POINT TO FIRST OPDR 


5405 


016502 


012757 


000027 


172516 




nov 


•27. 8«1 72516 


lINIT MMH5 


5406 


016510 


012757 


000001 


177572 


It: 


MOV 


•1,8«177572 


iTURN MMU ON 


5407 


016516 


011146 








MOV 


(Rl). (SP) 


iPUSM DATA ONTO THE STACK 


5400 


016520 


106611 








MTPO 


CRD 


(DO A RELOCATION 


5409 


016522 


005057 


177572 






CLR 


M177572 


iTURN MMU OFF 


5410 


016526 


022427 


077506 






CMP 


CR4).,»77506 


lis DATA EQUAL TO EXPECTED 


5411 


016552 


001405 








BEQ 


2( 


lOK GO ON 


5412 


016554 


104000 








ERROR 




|ALL ERRORS TO TRAP TO EMT VECTOR 


3415 


016556 


000265 








.WORD 


265 


(UNIQUE ERROR NUMBER 


5414 


016540 


001215 








.WORD 


HMUERR 


i ADDRESS OF ERROR MESSAGE 


5415 
















iNO GO TO EHROR 


5416 


016542 


062701 


020000 




2«: 


ADD 


♦20000, Rl 


(POINT TO NEXT VIRTUAL ADORES*; 


5417 


016546 


020127 


160000 






CMP 


Rl.«160000 


(ARE WE DONE 


5410 


016552 


001556 








BNE 


It 


(NO GO TO It 


5419 


016554 


000207 








RTS 


PC 


(RETURN 



016556 
016560 
016562 
016566 
016570 
016572 
016574 

016576 
016600 
016604 
016606 
016610 

016610 



016610 
016610 
016614 
016620 
016624 
016630 
016634 
016642 
016646 
016652 
016656 



005002 
011414 
022427 
001403 
104000 
000266 
001215 

005202 
020227 
001565 
000207 



077406 



000020 



005267 
005057 
005037 
012704 
004767 
012737 
005057 
015746 
015746 
013746 



162 17C 
177572 
001042 
017200 
162452 
000057 
177776 
000010 
000014 
000016 



(ROUTINE TO EXPLICITLY WRITE TO POPS AND TEST 
(CLEARED AND IF NOT CLEARED REPORT AN ERROR 

T15A: CLR R2 
1»: MOV CR4),(R4) 

(R4).. 477406 
21 



PAGE WRITTEN BIT FOR BEING 



CLR 
MOV 
CMP 
BEQ 
ERROR 
.WORD 
.WORD 



21 



INC 
CMP 
BNE 
RTS 

T15FIN: 

TS»t116: 

I (•••••••••« 

(•TEST 26 



266 
MJWERR 

R2 

R2.«20 

1( 

PC 



(CLEAR COUNTER 

(DO AN EXPLICIT WRITE TO PDR 
(IS DATA EQUAL TO EXPECTED 
(OK GO ON 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS or ERROR MESSAGE 
(NO GO TO ERROR 

(INCREMENT POINTER 
(ARE WE DONE 
(NO GO TO 1» 
(RETURN 



TEST CSM (CALL SUPERVISOR MODE) 



TST26: 



172S16 



INC ITESTN 

CLR 9*177572 

CLR 90FLAG 

MOV «TMM16E.R4 

JSR PC. MMU 

MOV •57.M172S16 

CLR 8«177776 

MOV S«10. (SP) 

MOV a#14,-CSP) 

MOV M16. (SP) 



(INCREMENT TEST NUMBER 
(MMU OFF 

(CLEAR MMU ABORT FLAG 
ilNIT R4 
ftlNIT MMU 

(ENABLE CSM INSTRUCTION 

(SET PS TO KER MODE 

(SAVE VECTORS 

( 

( 



ULOBrii, ARI AS 
KOJllA.MAC 



11 



D6 



ST StJPtRVlSOR MODE ) 



5455 


016662 


012757 


017054 


000010 




MOV 


«TMM16B.S«10 






iSETUP NEW VECTORS 




5454 


016670 


012757 
012757 


000157 


000014 




MOV 


•157.8*14 






1 




5455 


016676 


017214 


000016 




MOV 


•TMM16A.a*I6 






1 




5456 


016704 


007014 








.UORD 


7014 






1 TEST INSTRUCTION 




5457 


016706 


104000 








ERROR 








jALL ERRORS TO TRAP TO EMT 


VECTOR 


M58 


016710 


000267 








.WORD 


267 






lUNIQUE ERROR NUMBER 




5459 


016712 


001215 








.UORD 








1 ADDRESS OF ERROR MESSAGE 




5460 
















iGO 


TO 


ERROR ir NOT TRAPPED 




5461 


016714 


012757 


017110 


000010 


TSM16A: 


MOV 


•THM16C.8410 






1 SETUP NEW VECTOR 




5462 


016722 


012757 


000027 


172516 




MOV 


•27.B#172516 






iDISABLE CSM INSTRUCTION 




3465 


016750 


012757 


140000 


17777w 




MOV 


•140000.84177776 






iSET PS TO USER MODE 




5464 


016756 


007014 








.UORD 


7014 






1 TEST INSTRUCTION 




5465 


016740 


104000 








ERROR 








lALL ERRORS TO TRAP TO EMT 


VECTOR 


5466 


016742 


000270 








.UORO 


270 






lUNIQUE ERROR NUMBER 




5467 


016744 


001215 








.WORD 


MMUERR 






1 ADDRESS OF ERROR MESSAGE 




5469 
















iGO 


TO 


ERROR IF NOT TRAPPED 




5469 


016746 


012757 


017144 


000010 


TSM168: 


MOV 


•THM160.a410 






iSETUP NEU VECTOR 




5470 


016754 


012757 


000027 


172516 




MOV 


•27,8«172516 






1 DISABLE CSM INSTRUCTION 




5471 


016762 


005057 


177776 






CLR 


8*177776 






I SET PS TO KER MODE 




5472 


016766 


007014 








.WORD 


7014 






J TEST INSTRUCTION 




5475 


016770 


104000 








ERROR 








lALL ERRORS TO TRAP TO EMT 


VECTOR 


5474 


016772 


000271 








.WORD 


271 






lUNIQUE ERROR NUMBER 




5475 


016774 


001215 








.UORD 


MMUERR 






1 ADDRESS OF ERROR MESSAGE 




5476 














:G0 


TO 


ERROR IF NOT TRAPPED 




5477 


016776 


012757 


000057 


172516 


TSM16C: 


MOV 


♦57.04172516 






lENABLE CSM INSTRUCTION 




5470 


017004 


012757 


040000 


177776 




MOV 


•40000. 8*177776 






J SET PS TO SUP MODE 




5479 


017012 


012706 


000700 






MOV 


•700. R6 






sINIT SUP SP 




5480 


017016 


012757 


140000 


177776 




MOV 


♦140000, 8#1 7 77 76 






iSET PS TO USER MODE 




5481 


017024 


012706 


000600 






MOV 


♦600. R6 






;INIT USER SP 




5482 


017050 


012757 


000014 


000010 




MOV 


♦14. 8410 






iSETUP NEU VECTOR 




5485 


017056 


000277 








sec 








iSET ALL CC BITS 




5484 


017040 


007024 








.UORD 


7024 






I TEST INSTRUCTION 




5485 


017042 








TSM160: 














5486 


017042 


104000 








ERROR 








8 ALL ERRORS TO TRAP TO EMT 


VECTOR 


5487 


017044 


000272 








.UORD 


272 






s UNIQUE ERROR NUMBER 




5488 


017046 


001215 








.UORD 


MMUERR 






t ADDRESS OF ERROR MESSAGE 




5489 
















iGO 


TO 


ERROR IF NOT TRAPPED 




5490 


017050 


000167 


000654 






JMP 


TM16A 










5491 










i 














5492 










t 














5495 


017054 


042757 


007777 


177776 


TMM16B: 


BIC 


♦7777.a^l77776 






: CLEAR UNWANTED BITS 




5494 


017062 


022757 


000000 


177776 




CMP 


♦0. 8^177776 






lis PS CORRECT 




5495 


017070 


001405 








BEQ 


1* 






s YES GO ON 




5496 


017072 


104000 








ERROR 








lALL ERRORS TO TRAP TO EMT 


VECTOR 


5497 


017074 


000275 








.WORD 


273 






i UNIQUE ERROR NUMBER 




5498 


017076 


001215 








.UORD 


MMUERR 






1 ADDRESS OF ERROR MESSAGE 




5499 
















iNO 


GO 


TO ERROR 




5500 


017100 


005726 






l*i 


TST 


(SP)» 






1 CLEAN UP STACK 




5501 


017102 


005726 








TST 


(SP). 






1 




5502 


017104 


000167 


177604 






JMP 


TSM16A 






iCONTINUE TESTING 




5505 


017110 


042757 


007777 


177776 


TMril6C : 


BIC 


♦7777, 8^177776 






iCLEAR UNUANTEO BITS 




5504 


017116 


022757 


050000 


177776 




CMP 


♦50000. a^l 7 7776 






lis PS CORRECT 




5505 


017124 


001405 








BEQ 


1» 






itES GO ON 




5506 


017126 


104000 








ERROR 








|ALL ERRORS TO TRAP TO EMT 


VECTOR 


5507 


017150 


000274 








.UORD 


274 






lUNIQUE ERROR NUMBER 




5508 


017152 


001215 








.UORD 


MMUERR 






1 ADDRESS OF ERROR MESSAGE 





tb 



GLOBAi AREAS 
KOJllA.MAC 

5509 



MAC I II 50A(105^) 
20 MAR S4 11:19 



t>0 MAR 64 

T26 



11 



;31 PAGE 69 
TEST CSM (CALL 



SUPERVISOR MODE) 



^EO O069 



5510 


017154 


005726 






1*: 


TST 


(SP)» 


5511 


017156 


005726 








TST 


(SP). 


5512 


017140 


000167 


177602 






JMP 


TSM16B 


5515 


017144 


042757 


007777 


177776 


TMM16D: 


BIC 


• 7777,8(»177776 


5514 


017152 


022757 


000000 


177776 




CMP 


•O.S»177776 


5515 


017160 


001405 








BEQ 


It 


5516 


01 . 162 


104000 








ERROR 




5517 


017164 


000275 








.WORD 


275 


5518 


017166 


001215 








.WORD 


MMUERR 


5519 














1 


5520 


017170 


005726 






1»: 


TST 


(SP)» 


5521 


017172 


005726 








TST 


(SP)» 


5522 


017174 


000167 


177576 






JMP 


t<;mi6C 


5525 


017200 


156450 






TMM16E : 


.WORD 


156450 


5524 


017202 








TMM16r ; 






5525 


017202 


104000 








ERROR 




5526 


017204 


000276 








.UORD 


276 


5527 


017206 


001215 








.WORD 


MMUERR 


5528 














1 


5529 


017210 


000167 


000474 






JMP 


TM16A 


5550 


017214 


022757 


070017 


177776 


TMM16A: 


CMP 


♦70017, a#17r776 


5551 


017222 


001405 








BEQ 


l» 


5552 


01 7224 


104000 








ERROR 




5555 


017226 


000277 








.WORD 


277 


5554 


017250 


001215 








.WORD 


MMUERR 


5555 
















5556 


017252 


020627 


000572 




1<: 


CMP 


R6.<r572 


5557 


017256 


001405 








BEQ 


2» 


5558 


017240 


104000 








ERROR 




5559 


017242 


000500 








.WORD 


500 


5540 


017244 


001215 








.WORD 


MMUERR 


5541 
















5542 


017246 


020427 


017202 




2*: 


CMP 


R4.«TMM16E*2 


5543 


017252 


001405 








BEQ 


5» 


5544 


017254 


104000 








ERROR 




5545 


017256 


000501 








.WORD 


501 


5546 


017260 


001213 








.WORD 


MMUERR 


5547 
















5548 


017262 


025727 


017200 


156430 


31: 


CMP 


8«TMM16E. #156450 


5549 


017270 


001405 








BEQ 


4$ 


5550 


017272 


104000 








ERROR 




5551 


017274 


000502 








.WORD 


502 


5552 


017276 


001213 








.MWD 


MMUERR 


5555 
















5554 


017500 


022627 


156450 




4t: 


CMP 


CSP)», 0156430 


5555 


017504 


001403 








BEQ 


5» 


5556 


017506 


104000 








ERROR 




3557 


017510 


000505 








.WORD 


305 


355c 


017512 


001215 








.WORD 


MMUERR 


5559 
















5560 


017514 


022627 


017042 




5f: 


CMP 


(SP)»,»TSM160 


5561 


017520 


001405 








BEQ 


6» 


3562 


017522 


104000 








ERROR 




5565 


017524 


000504 








.UORD 


304 


5564 


017326 


001213 








.WORD 


MMUERR 



iNO CO TO ERROR 

I CLE AN UP STACK 

•CONTINUE TESTING 
I CLEAR UNWANTED BITS 
lis PS CORRECT 
lYtS GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 

(CLEAN UP STACK 

! CONTINUE TESTING 
J TEST LOCATION 

I ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
iGO TO ERROR IF OIDN' T ABORT 

J IS PS CORRECT 
iyES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
i ADDRESS OF ERROR MESSAGE 
tNO GO TO ERROR 

J IS SP CORRECT 
(YES GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
:N0 GO rO ERROR 

{IS R4 CORRECT 
{YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
{NO GO TO ERROR 

lis TEST LOCATION OK 
{YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
; UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(IS STACK CORRECT 
{YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(IS STACK CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



GLOBAL AREAS NACUl S0A(I052) 20 HAR 84 11:31 I 
KOJllA.nAC 20 riAR 84 11:19 T26 TEST 



5565 
















017330 


022627 


140000 




6»: 


CMP 


3567 


017334 


001403 








BEw 


3568 


017336 


104000 








ERROR 


3569 


017340 


000305 








.WORD 


3570 


017542 


001213 








.WORD 


3571 














3572 


017344 


012706 


000700 




7»: 


NOV 


3573 


017550 


012737 


140000 


177776 




nov 


3574 


017556 


020627 


000600 






CMP 


3575 


017562 


001403 








BEQ 


3576 


017564 


104000 








ERROR 


3577 


017566 


000506 








.UORO 


3578 


017570 


001213 








.WORD 


3579 














3560 


017572 


012767 


077400 


152600 


81: 


MOV 


3581 


017400 


012757 


017202 


000016 




MOV 


3582 


017406 


012757 


000001 


001042 




MOV 


3583 


017414 


012757 


000001 


177572 




MOV 


3584 


01742? 


010701 








MOV 


3585 


017424 


007014 








.WORD 


3586 


017426 


022757 


000000 


001042 




CMP 


3587 


017434 


001405 








BEQ 


3588 


017436 


104000 








ERROR 


3589 


017440 


000507 








.WORD 


3590 


017442 


001213 








.UORD 


5591 














3592 


017444 


023701 


001076 




91; 


CMP 


5595 


017450 


001403 








BEQ 


5594 


017452 


104000 








ERROR 


5595 


017454 


000310 








.WORD 


5596 


017456 


001213 








.WORD 


3597 














3598 


017460 


025727 


001072 


100041 


101: 


CMP 


5599 


017466 


001405 








BEQ 


5600 


017470 


104000 








ERROR 


3601 


017472 


000511 








.WORD 


5602 


017474 


001215 








.WORD 


5605 














3604 


D174 76 


012757 


000057 


172516 


IK: 


MOV 


5605 


017504 


012757 


040000 


177776 




MOV 


3606 


017512 


012706 


000700 






MOV 


5607 


017516 


012757 


140000 


177776 




MOV 


5606 


017524 


012706 


000600 






MOV 


5609 


017550 


012757 


000014 


000010 




MOV 


5610 


017536 


012757 


017564 


000016 




MOV 


5611 


017544 


000277 








sec 


5612 


017546 


007027 








.UORO 


5615 


017550 


045712 








.WORD 


3614 


017552 








TS16A: 




5615 


017552 


104000 








ERROR 


5616 


017554 


000512 








.UORO 


5617 


017556 


001215 








.UORO 


5618 














3619 


017560 


000167 


000124 






JMP 


5620 


017564 


022757 


070017 


177776 


TS16: 


CMP 



F6 

: 70 

1 (CALL SUPERVISOR MODE) 



SEO 00/0 



(SP)». 0140000 
7$ 

305 

MMUERR 
•700. R6 

•140000.84177776 
R6.«600 
8t 

306 

MMUERR 

•77400. SIPORO 
•TMM16r.S^16 
• l.MfLAG 
•1.W177572 
R7,R1 
7014 

•0.a«rLAG 
9f 

307 

MMUERR 

8«SAVMR2.R1 
10» 

310 

MMUERR 

MSAVMRO.^100041 
lit 

311 

MMUERR 

♦37. aWl 72516 
•40000. Ml 77776 
•700, R6 

•140000.84177776 
•600. R6 
•14. 8410 
•TS16.8«16 

7027 
45712 



I NO GO TO ERROR 

,IS STACK CORRECT 
J YES GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
1 UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

; RESTORE SUP SP 
I SET PS TO USER MODE 
lis USER SP CORRECT 
J YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
{NO GO TO ERROR 

I SETUP SIPORO TO ABORT 
jSETUP VECTOR 
t SETUP FLAG FOR AN ABORT 
J TURN MMU ON 
;SAVE OLD PC 
; TEST INSTRUCTION 
tOID AN ABORT OCCUR 
I YES GO ON 

;ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
i ADDRESS OF ERROR MESSAGE 
;N0 GO TO ERROR 

lis MMR2 CORRECT 
:YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
{NO GO TO ERROR 

{IS MMRO CORRECT 
{YES GO ON 

{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
{NO GO TO ERROR 

{ENABLE CSM 
{SET PSU TO SUP 
{SETUP SUP SP 
{SET PSU TO USE 
{SETUP USE SP 
{SETUP NEU VECTOR 
{SETUP NEU VECTOR 
(SET ALL CC BITS 
(TEST INSTRUCTION 



512 

MMUERR 
TM16A 

♦70017. a«177776 



{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I GO TO ERROR IF DIDN'T TRAP 

lis PSU CORRECT 



G6 



GLOBAL 
KOJllA, 



AREAS 
MAC 



liACUl 30A(1052) 
20 HAR 84 11:19 



^0 HAR 84 

T56 



11 



5621 


017572 


001403 




5622 


017574 


104000 




3625 


017576 


000315 




3624 


017600 


001213 




5625 








3626 


017602 


020627 


000572 


5627 


017606 


001405 




5628 


017610 


104000 




3629 


01 7612 


000514 




3650 


017614 


001213 




3651 








3t>32 


017616 


022627 


045712 


5655 


017622 


001403 




5634 


017624 


104000 




5655 


017626 


000315 




5656 


017630 


001215 




5637 








5658 


017632 


022627 


017552 


5659 


017636 


001405 




5640 


017640 


104000 




5641 


017642 


000316 




5642 


017644 


001213 




5645 








5644 


017646 


022627 


140000 


3645 


017652 


001405 




3646 


017654 


104000 




5647 


017656 


000317 




5648 


017660 


001213 




5649 








5650 


017662 


012706 


000700 


5651 


017666 


012757 


140000 


5652 


017674 


020627 


000600 


5655 


017700 


001405 




5654 


017702 


104000 




3655 


017704 


000520 




5656 


017706 


001213 




3657 








5S58 


017710 


005057 


177776 


3659 


017714 


005067 


157652 


3660 


017720 


005067 


152572 


5661 


017724 


012657 


000016 


3662 


017730 


012637 


000014 


5665 


017754 


012657 


000010 


3664 








3665 








3666 








3667 









2001: 



201* I 



202 > I 



2031: 



204$: 



T«16A: 



TPST c 


§^ /^ALL SUPERVISOR MODE) 






BEQ 


200$ 






jYES GO ON 




ERROR 








jALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


513 






(UNIQUE ERROR NUMBER 




.WORD 


MMUERR 






t ADDRESS OF ERROR MESSAGE 








>N0 


GO 


TO ERROR 




CMP 


R6 . *572 






J IS SP CORRECT 




BEQ 


201* 






J YES GO ON 




ERROR 








sALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


514 






(UNIQUE ERROR NUMBER 




.UORO 


MMUERR 






(ADDRESS OF ERROR MESSAGE 








]N0 


GO 


TO ERROR 




CMP 


(SP)» .«45712 






(IS STACK CORRECT 




BEQ 


202 » 






(YES GO ON 




ERROR 








(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


315 






(UNIQUE ERROR NUMBER 




.UORO 


MMUERR 






(ADDRESS OF ERROR MESSAGE 








iNO 


GO 


TO ERROR 




cw 


(SP)* .«TS16A 






(IS STACK CORRECT 




BEQ 


2051 






(YES GO ON 




ERROR 








(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORD 


516 






(UNIQUE ERROR NUMBER 




.UORO 


MMUERR 






(ADDRESS OF ERROR MESSAGE 








:N0 


GO 


TO ERROR 




CMP 


(SP)*.«140000 






(IS STACK CORRECT 




BEQ 


204$ 






(YES GO ON 




ERROR 








(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


517 






(UNIQUE ERROR NUMBER 




.UORO 


MMUERR 






(ADDRESS OF ERROR MESSAGE 








tNO 


GO 


TO ERROR 




MOV 


•700. R6 






(RESTORE SUP SP 




MOV 


•140OOO.80177776 




(SET PSU TO USER MODE 




CMP 


R6.«600 






(IS USER SP CORRECT 




BEQ 


TM16A 






(YES GO ON 




ERROR 








(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORD 


320 






(UNIQUE ERROR NUMBER 




.WORD 


MMUERR 






(ADDRESS OF ERROR MESSAGE 








iNO 


GO 


TO ERROR 




CLR 


8*177776 






(SET PS TO KER MODE 




CLR 


SRO 






(TURN OFF MMU 




CLR 


SR3 






[TURN OFF 22 BIT ADDRESSING. ICO 


MOV 


(SP)».a«16 






(RESTORE VECTORS 




MOV 


csp)».a*i4 






s 




MOV 


( SP ) ► , a^io 






( 





SEQ fiOn 



SPACE 



OLOBAl are MS 
KOJllA.MAC 



MAC II SOAdOW) 
20 MAR 04 11:19 



^0 MAR 64 

T26 



11:31 PAGE 
TEST CSM 



72 

( CALL 



SUPERVISOR MODE) 



SEO 0072 



56t>0 










.MCALL 


lOMSG.ENDPAS 














.SBTTL 


END OF 


PASS ROUTINE 




5670 


















30 7\ 










J •INCREMENT THE 






So l2 










: PASS NUMBER (tPASS) 


90 ' 3 










i*INOICATE END 


OF PROGRAM AFTER 


1 PASSES THRU THE PROGRAM 












t*If TMERES A MONITOR GO TO IT 




30 '3 










i«IF THERE ISN'T JUMP TO RESTART 






















50 » / 


A1 77AA 
Ux ' '*U 








9CUr : 








So lO 


Ol ' l40 


AAC 7^ 7 
003 '07 


1^1 AA ^ 
lOl04<^ 






TQT 




:UNI T I YPt ntbbAGc AT END Or FIRST 




Ol / 744 


AA t AA 

OOIOO^ 










X~ 


; Ir >0 THEN SKIP Tt* ID MESSAGE 




01 ' '4e 


104401 


AOAAA^ 

0c004o 






T YPP 


M^f^ 1 
. ri JO 1 


.CI cc TvDC Tmc ta Mcccar^c 




A1 77<t^ 

Ol / 7D<: 








CKTPTD • 










A1 7 7C^ 
01 ^ '32 


AA^O^ 7 

OOseO ' 


1^1 A VA 

loioso 






TKir 

Xi^w 




. . TKirDCMCkiT TuC DACC kjl MOCD 
; ;lNLKtntNI IMC rHbi NUntScK 




A1 7 7<tA. 
Ox ' '30 


AA0 7iL7 
O^C »0 I 


1 AAAAA 

xouooo 


1 iL1 AOO 

lOiOec 




RTr 


wXWVWi •~r13j 


> ■ nnki ' T fli 1 ALj A ucr* kji mdco 


5004 


A1 7 7CA 
Ol » '04 


AAil VO 7 












. . 1 nno 7 




Ol » fOO 


OVWOOX 






tPriPrT ■ 




1 
X 




•jOOO 


A1 777rt 
Ul ' ' 'O 


fVt5A33 
UU'JOcc 








D\J 1 


* AAAnu 

'Ownun 


: > 'to 


dOO ' 


rtl 7773 
Ox ' ' 'C 


m 37T7 
wXc » J ' 










( pr 1 » af or ^ > 


. .DCCTnOC r Al iklTCO 




rtl 7 77A 

OX ' ' 


OOOOOx 






iFkinrT • 




1 
X 




A 1 7 7 7iL 
wX ' ' 'O 


ftl 77<^^ 
OX f 'OD 
















AO/VW» 

vcWOv 


1 AAdm 
lO^^OX 


nom 3^ 

OcOxc3 






T YPF 


M<;n3 




do 71 


OcOOO^ 


Af il7Ail 
O XO r *0 


lOO' »o 






Hnu 


tPA^C f CP ^ 


. .CAt/C tOACC CAO TvDCAlIT 




A3/V>1 A 

OeUOlO 


XO^^Oj 








typhq 

1 1 rUj 




; ;bU 1 Trt - UtLlnAL AbLIi Wlin 5X(jN 




OeUUxc 


1 f\AAf\% 

io^*oi 


AOAAA O 
OcOO*»c 






T YPF 


tFM I 1 






AOAA1 ^ 

Ocoolo 


At V7AA 
Old 'OO 


AAAAA O 

000042 




(f^TAO. 

tuC 1 He * 


nuv 


OAAO DA 

otv^c t no 


. -/*CT MrHjTTAO AAADCCC 

iiuci nuNilUK HUUHcab 




OcUOec 


AAf AAC 
001403 








RFn 


tnnAfiKi 
9Uoniji>i 


. .nO&lLlPLJ TC klA MAklTTAO 

; lOHMNLn Ir NU nUNllUH 




AOAAOA 


AAAAAC 
000003 












■ CAD TkJC UADl A 




OcOUeo 


AAA 71 A 

00*» 1 xo 






tPMiAn . 


ICQ 
^9ri 


pr rPo^ 

"v. • I "O 1 


1 1 uU 1 U nUN 1 I UK 




n3AA5n 

OcOOdO 


AAAOAA 
OOOc^O 












. .CAlfC AAAM 

t t bAVfe ROOM 




OcvOd£ 


AAAOAA 
OOOc^O 












. . ^AD 

t jr OR 


J ' w 


A3AAXA 
OcOv>^ 


AAAOAA 








MOP 




. . A^*T 1 1 

t : ACT 1 1 




03OO5JL 
vc WOO 








•uw^uri : 






X7n3 


OcOOOO 


AAA1 Xl 

ouoxo > 








IMP 


af pr ■» > 


. . DC Tl IDIkj 


xmx 


OcOO^O 


AAOA^^ 

OOeOOO 






tQTMAn> 


. pii^ii/ 


QFCTAQT 




X7n4 


AO AAA O 


T77 

oft 


* 77 

off 


AAA 
OOO 


iFMI 1 • 

vcn^^i. : 


rytf 


- 1 .1 n 

i • * 1 tO 


S SNULL LMHRMLitH STRlNu 


J ■ w3 




AOAAA^ 
0c0040 
















ADAAAil 
«/cOO^O 


AACA1 ^ 
0030x3 


ACC 1 AV 

033103 


AA01 t X 

042113 




.ASCIZ 


<CR><LF>/CZKDK B 


A Uf\ 11 1 MCMAOv M Alkldr^C MC UT A T Ar~klAC T T / 


'S707 


.tOAA^A 

OcvOD^ 


Oe03X'9 


AO^i^O 

0<:o302 


AOAA£.A 
0200D0 










X70R 


ApAAiO 


AA31 1 Y 
O^CXXA 


AVACI o 
0303XC 


AOAAA 1 

OeOOOx 










'X7ftO 

J f V™ 




04<f313 


AA7d C 
04 f 313 


ACACOO 

034322 










X710 
^ f XV 


OcOO f O 


o^o^#o 


AA7 1 A1 
O* f lOx 


AA VCA1 

043301 










571 1 


AOAI AA 


0*0303 


AA71 AC 
O^ r X03 


AOAf OA 












OcOxXc 


AAAOAA 
0**30^ 


AA TCA 1 

04330X 


AA 7C t £ 
04 f 3lO 










571 5 


AOA 1 3A 
OcOXcO 


ACOl o* 

03exc0 


AA 1 CI 1 
U41311 


AAA 
OOO 










571 A 

w f X^ 


AOA f 

OcOXcO 


A1 CL 
Ox3 


AA fl A 1 O 

041412 


043332 


MSG2: 


.ASCIZ 


<CR>*LF>/CZKDKB 


END PASS */ 




A3A1 TO 

Oco X 


AA i^KAA 
043304 


AOAt AO 

020102 


AA 71 AC 
047103 










^ f Xw 


A3A1 AO 


AOA1 AA 


O^U3cO 


AC1 COT 
03X3c3 










5717 


09014<« 


AOI AAA 

vcx^*io 


Ann 
wo 












3718 




020152 






.EVEN 








5719 










.SBTTL 


TYPE ROUTINE 




5720 


















5721 


















5722 










i*ROUTINE TO TrPE ASCIZ MESSAGE. 


MESSAGE MUST TERMINATE WITH A 0 BtTE. 


5723 










i*rHE ROUTINE WILL INSERT A NUMBER Of NULL CHARACTERS AFTER A LINE FEED. 



Lb 



GLOBAL AREAS ««C>ll 50A(1052) 20 MAR 64 11:31 PAGE 73 

KOJllA.MAC ^0 MAR 84 11:19 TYPE ROUTINE 

^7^4 :«N0TE1: »NULL CONTAINS THE CHARACTER TO BE USED AS THE ^ILLER CHARACTER. 

3725 S«N0TE2: »FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQCIREO. 

3726 j»N0TE3: »FILLC CONTAINS THE CHARACTER TO FILL AFTER. 

3727 :* 

3728 ;*CALL: 

3729 :•!) USING A TRAP TNSTRUCTION 

3730 TYPE .MESADR j jMESADR IS FIRST ADDRESS OF AN MSCI2 STRING 

3731 !*0R 

3732 J* TYPE 

3733 HESAOR 

3734 :* 
3735 







1 05767 


00054 5 




ITYPE • 


TSTB 


ITPFLG 


<tIS THERE A TERMINAL'' 


O 1 O ' 












BPL 


X • 


i iBR IF YES 






www 








HALT 




tiHALT HERE IF NO TERMINAL 






nooA5o 








BR 


31 


1 i LEAVE 


^ 7ACi 




nto<M6 






1 1 • 




RO - ( SP ) 


1 i SAVE RO 


^741 

O f ^ L 




V X > VW 


OOOOOP 






MOV 


apcsp) RO 


iiGET ADDRESS OF ASCI7 STRING 




7? 


1 PP767 


000001 

WVW X 


1606P0 




CliPB 


dAPTENW lENV 


s> RUNNING IN APT MODE 


X7AX 




WXVX X 








RNE 


62 1 


1 -NO GO CHECK FOR APT CONSOLE 




vcvcvc 


1 5P767 


OOOlOO 
vwx w 


16061 1 

X WW X X 




BTTB 


•APTSPOOL tENVM 


>i SPOOL MESSAGE TO APT 


■J / "f J 


ucvc 


nni A05 

WX^w J 








BEQ 


6PI 


i I NO GO CHECK FOR CONSOLE 


J 1 "to 


WCVC ic 




000004 






MOV 


nw » VX * 


t I SETUP MESSAGE ADDRESS FOR APT 


574 7 




OAA 767 


0016PP 






J5R 


PC iatys 


1 1 SPOOL MESSAGE TO APT 

i 0 J» www ' IW ■J J" WW • w nr i 


J ' "to 




www 






ox V • 




0 


1 : MESSAGE ADDRESS 






1 5P767 


00A040 


160567 


9 m 


BTTB 


•APTCSUP lENUM 


::APT CONSOLE SUPPRESSED 

i 1 ■ w\^v<jwww WW* • nw «J w 


3750 




fMI (V)5 
u^yx w^ 








BNE 


60$ 


., YES. SKIP TYPE OUT 


3751 


0?f>954 


X xcv^o 








HOUR 




! tPUSH CHARACTER TO BE TYPED ONTO STACK 


17SP 

•J 1 JC 




WXW3 








one 


4 1 


t cBR IF IT TSN' T THE TERMINATOR 

1 1 W" X ■ XI ^ J™ • • > VW > W n ■ IX 1 w*^ 


3755 


wCVC"tV 


W J f CO 












11 IF TERMINATOR POP IT OFF THE STACK 


3754 




vXCOW 








MOV 


r cp ) ^ po 


1 iRESTORE RO 


3755 




VvC r XO 


OOOOOP 
vwwc 






ADO 




• 1 ADJUST RETURN PC 


3756 




wwvc 








RTI 

nix 




. .RETURN 


3757 




1PP716 


OOOOl 1 

WWX X 






CMPB 


#HT (SP) 


: 'BRANCH IF <HT> 


3758 


0P0P56 


001450 

W X"f 








BFQ 


at 








1 1 

lec ' 16 


OUveOO 






^MOQ 

LrwTJ 


ACOl C f CO ^ 




3760 


020264 


001006 

WX VVV 








BNE 


51 




57<i1 












TST 


f CO > • 


• •DOD ^ro-k^i r> rmiTv 

t jKUf <LH»<Lr » CUUXV 


3762 


020270 


104401 








TYPE 




; : TYPE A CR AND LF 


3763 


020272 


001277 








$CRLF 






3764 


020274 


105067 


000202 






CLRB 


ICHARCNT 


jiCLEAR CHARACTER COUNT 


3765 


020300 


000755 








BR 


2» 


{ jGET NEXT CHARACTER 


3766 


020302 


004767 


000056 






JSR 


PC.ITYPEC 


itGO TYPE THIS CHARACTER 


3767 


020306 


126726 


000206 




61: 


CMPB 


»FILLC.(SP). 


J J IS IT TIME FOR FILLER CHARS.? 


3768 


020312 


001350 








BNE 


2* 


ti IF NO GO GET NEXT CHAR. 


3769 


020314 


016746 


000176 






MOV 


•NULL. (SP) 


itGET • OF FILLER CHARS. NEEDED 


3770 
















iiAND THE NULL CHAR. 


3/71 


020320 


105366 


000001 




7«: 


OECB 


l(SP) 


tiOOES A NULL NEED TO BE TYPED? 


3772 


020324 


002770 








BLT 


6» 


itBR IF NO-GO POP THE NULL OFF OF STACK 


3773 


020326 


004767 


000032 






JSR 


PC.ITYPEC 


;jGO TYPE A NULL 


3774 


020332 


105367 


000144 






OECB 


ICHARCNT 


j»00 NOT COUNT AS A COUNT 


3775 


020336 


000770 








BR 


7$ 


i iLOOP 


3776 


















3777 










shorizontal tab 


PROCESSOR 




3778 


















3779 


020340 


112716 


000040 




8«: 


MOVB 


»• .(SP) 


mReplace tab uith space 



J6 



GLOBAL AREAS MACtll 30A(1052) 20 HAR 64 11:31 PAGE 74 
KOJllA.riAC 20 MAR 84 11:19 TrPF ROUTINE 



SEO 0074 



3780 


020544 


004 767 


000014 




3781 


020350 


132767 


000007 


000124 


3782 


020356 


001372 






3/83 


020360 


005726 






3784 


020362 


000724 






3785 


020364 








3786 


020364 


105777 


000116 




3787 


020370 


100022 






3788 


020372 


017746 


000112 




3789 


020376 


042716 


177600 




5790 


020402 


122716 


000023 




5791 


020406 


001012 






5792 


020410 








3793 


020410 


105777 


000072 




3794 


020414 


100375 






3795 


020416 


117716 


000066 




3796 


020422 


042716 


177600 




3797 


020426 


122716 


000021 




3798 


020432 


001366 






3799 


020434 








3800 


020454 


005726 






3801 


020436 








3802 


020456 


105777 


000050 




3803 


020442 


100375 






3804 


020444 


116677 


000002 


000042 


3805 


020452 


122766 


000015 


000002 


3606 


020460 


001003 






3807 


020462 


105067 


000014 




3808 


020466 


000406 






3809 


020470 


122766 


000012 


000002 


3810 


020476 


001402 






3811 


020500 


105227 






3812 


020502 


000000 






3813 


020504 


000207 






3814 










3S15 


020506 


177560 






3816 


020510 


177562 






3817 


020512 


177564 






3818 


020514 


177566 






3819 


020516 


000 






3820 


020517 


002 






3821 


020520 


012 






3822 


020521 


ooo 






3823 


020522 


077 






3824 


020523 


012 


000 




V a 1 e 

3825 




020526 






3826 










3827 










3828 










3829 










5830 










3831 










3832 










3833 










3834 










5855 











9$: 



ITYPEC: 



101* : 



1021: 
lOt: 



JSR 

BITB 

BNE 

TST 

BR 

TSTB 

BPL 

MOV 

BIC 

CMPB 

BNE 

TSTB 
BPL 

novB 

BIC 

CMPB 

BNE 

TST 



TSTB 
BPL 
MOVB 
CMPB 
BNE 
CLRB 
BR 

I*: CMPB 
BEQ 
INCB 
tCHARCNT:.UORO 
tTYPEX: RTS 



*TKS: 

«TKB: 

»TPS: 

*TP6: 

♦NULL: 

IF ILLS: 

iriLLC: 

♦TPFLG: 

IQUES: 

ILF: 

.SBTTL 



.UORO 

.UORO 

.WORD 

.UORO 

.BYTE 

• BYTE 

.BYTE 

.BYTE 

.ASCII 

.ASCIZ 

.EVEN 

CONVERT 



PC.JtrPEC 

«7.»CHARCNT 

91 

(SP)» 
2t 

StTKS 
10 S 

8»TKB, -(SP) 
♦177600. (SP) 
•IXQFF.CSP) 
102 1 

SITKS 
1011 

StTKB.CSP) 
♦177600. (SP) 
♦tXON.CSP) 
101 « 

(SP)» 

8»TPS 
10$ 

2CSP).8»TPB 

♦CR,2(SP) 

It 

»CMARCNT 

♦TYPEX 

♦LF.2(SP) 

♦TYPEX 

CPC)» 

0 

PC 

177560 

177562 

177564 

177566 

0 

2 

12 

0 

,•■)•> 

<i2> 



I J TYPE F SPACE 

I jBRANCH if not AT 

;iTAB STOP 

J ;POP SPACE OFF STACK 
I J GET NEXT CHARACTER 

;iCHAR IN KYBD BUFFER? 
jiBR IF NOT 
: sGET CHAR 

::STRIP EXTRANEOUS BITS 
: :WAS CHAR XOFF 
:iBR J- NOT 

liUAIT FOR CHAR 

jjGET CHAR 
I J STRIP IT 
I iUAS IT XON? 
: iBR IF NOT 

I jFIX STACK 

;5UAIT UNTIL PRINTER IS READY 



BE TYPED INTO DATA REG. 
A CARRIAGE RETURN? 



MJOOOl 
MJDOOl 
MJOOOl 
MJOOOl 
iMJDOOl 
MJOOOl 
MJOOOl 
MJOOOl 
MJOOOl 
MJOOOl 
MJOOOl 
MJDOOl 
MJOOOl 
MJOOOl 
MJOOOl 
MJOOOl 

: MJOOOl 



;sLOAO CHAR TO 
s:IS CHARACTER 
; a BRANCH IF NO 
1 1 YES CLEAR CHARACTER COUNT 
J jEXiT 

;jIS CHARACTER A LINE FEED? 
J J BRANCH IF YES 
iiCOUNT THE CHARACTER 
isCHARACTER COUNT STORAGE 



jjTTY KOB STATUS ;MJ0001 

;jTTY KBO BUFFER sMJOOOl 

;tTTY PRINTER STATUS REG. ADDRESS 

;:TTY PRINTER BUFFER REG. ADDRESS 

j;CONTAINS NULL CHARACTER FOR FILLS 

jjCONTAINS ♦ OF FILLER CHARACTERS REQUIRED 

atlNSERT FILL CHARS. AFTER A "LINE FEED' 

J J "TERMINAL AVAILABLE" FLAG (BIT<07> -O-YES ) 

c QUEST ION MARK 

J jLlNEFEED 



BINARY TO DECIMAL AND TYPE ROUTINE 



J •THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-OIGIT 
:*SIGNEO DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON UHETHER THE 
(•NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TtPED 
: •BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL AluAtS BE 
; •REPLACED WITH SPACES. 
{•CALL: 

!• MOV NUM.-(SP) itPUT THE BINARY NUMBER ON THE STACK 



global arc as 
kojua.mac 



HAC»ll SOA(IOW) 
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CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 













> • 


T vpnc 

1 iKU J 
















































MAW 


wu , - V j" J 






A1 A1 








HAW 

nuv 


PI . f cp ^ 
H 1 , - V j" ^ 




A^A^IO 


A1 A3^A 










• ■ I jr* i 






Al AVAA 








MAW 


OX r CP ^ 






A1 A<AA 








MOW 

riV/V 


r CP ^ 

W J a V jr 7 




AOA^^A 


A1 ^7AA 


A9A3AA 






HAW 


AOnPAA - f CP 1 




A^A^AA 


A 1 AAA^ 


AAnA3A 






MOW 


POf CP 














RPI 


1 t 






AAC^A^ 








rico 


M J 






1 1 97AA 
1 Ic f DO 




AAAAA1 
VWvwX 






a' . 1 r CP 1 






AA<^nAA 






X * 










Al 37AX 










Ainni K RX 




AOA^7A 










"TV VD 


** fRX*)* 
W f \ J 3 • 






AA^AA3 










RP 






01 AAA1 








MOV 


tnTRl fROI RI 


XA^ 


A9fWtA9 








Xt • 




RI RS 


XA^^ 












RI T 




XA*tA 












XTIU 


RP 


XA<;7 


A9A<^1 A 


fWVl77A 










xt 

J • 


XASA 

JO 




AAOI OS 








Ann 


RI R^ 














I J 1 


RP 






AA1 AAO 








one 


J # 


XAA1 




1 AS71 A 








TQTR 


r CP 

V J~ i 


XAA3 


A9<V^33 


1 AAAA7 








RMT 

onx 


# • 


XAAX 




1 AAX1 A 
XUOdlw 






St • 


ASl R 


r cp^ 

I jr i 


XAAA 




1 AVAAT 










Aft 

o • 


XAI>S 

J WW J 


03<V\XA 


X XOOOO 


AAAA01 


1 77777 




MflWR 


X\ J^ **\HJ/ 








AAAAAA 




Al • 


DX9 




XAA7 


A?fV^3 


AS 3 7 A3 






7t • 


RTQ 
DX9 


A* RP 


XAAA 












MTlUR 


R3 fRX't* 


XAAQ 




AAS73A 








1 9 1 


\ HW ^ • 


XA70 






AAAA1 A 








HV s wXw 


XA71 
JO r X 




AA97AA 








RI T 


^ft 




070AA0 










RUT 


Aft 

o * 


SA7S 




Al ASA9 








Mnu 
nuv 


n J (Hs 


BA7A 

JO r ^ 




AAA7I«^ 








RQ 


Aft 


Jw f J 




XV J r cv 






Jll • 


TCTR 


V J^ i • 


SA76 

Jv r V 




1 AAAAX 








RPi 


Oft 


5fl77 

JO f V 




1 1 

XXvOOO 


1 77777 


1 7777A 
X f r f f O 






■ X V J" y* "cVHjj 


3878 

JW ' V 




10S01 X 






^9 : 


rt on 


V H J y 


3879 




m 9A/)S 

VXtfvV^ 








MflU 
riUw 


I'CP')* R^ 

\ jF* V ♦ # H J 


3880 




019M)X 








riuv 


(SP)..R3 


3881 




fli 94t07 








Mnif 
nuv 




388P 




019l%01 








HflV 




3883 




OIPAAO 

wXcOnA/ 








MflU 
nuv 




3684 


0P0714 


X w"*^VX 


ADA 74 p 






typf 




388S 


090 7PO 


vXOOvv 








MOW 
nuv 


{ SP ) ♦ . ( SP 1 


3866 


020726 


012616 








MOV 


3887 


020730 


000002 








RTI 




3886 


020732 


023420 






»DTBL: 


10000. 




3889 


020734 


001750 








1000. 




3890 


020736 


000144 








100. 




3891 


020740 


000012 








10. 





iiGO TO THE ROUTINE 



::PUSH RO ON STACK 
> jPUSH RI ON STACK 
1 1 PUSH R2 ON STACK 

I I PUSH R3 ON STACK 
J jPUSH R5 ON STACK 

tiSET BLANK SWITCH AND SIGN 

: :GET THE INPUT NUMBER 

iiBR IF INPUT IS POS. 

I t MAKE THE BINARY NUMBER POS. 

tiMAKE THE ASCII NUMBER NEG. 

mZERO THE CONSTANTS INDEX 

I! SETUP THE OUTPUT POINTER 

j;SET THE FIRST CHARACTER TO A BLANK 

tt CLEAR THE BCD NUMBER 

jiGET THE CONSTANT 

,,FORM THIS BCD DIGIT 

t:BR IF DONE 

j j increase the bcd digit by 1 

::a00 back the constant 
5! check if bcd digit. 0 
: ;fall through if 0 
;! still doing leading 0' s? 
mBR if yes 

I iMSO? 
i:BR IF NO 

II YES SET THE SIGN 

t iMAKE THE BCD DIGIT ASCII 

;jMAKE IT A SPACE IF NOT ALREADY A DTGIT 

itPUT THIS CHARACTER IN THE OUTPUT BUFFER 

It JUST INCREMENTING 

it CHECK THE TABLE INDEX 

{ tGO DO THE NEXT DIGIT 

itGO TO EXIT 

tjGET THE LSD 

stGO CHANGE TO ASCII 

tjUAS THE LSD THE FIRST NON ZERO? 

ttBR IF NO 

:tYES--SET THE SIGN FOR TYPING 

ttSET THE TERMINATOR 

ijPOP STACK INTO R5 

jtPOP STACK INTO R3 

J I POP STACK INTO R2 

I tPOP STACK INTO RI 

tiPOP STACK INTO RO 

tlNOU TYPE THE NUMBER 

1 1 ADJUST THE STACK 

i (RETURN TO USER 



L6 



IkOeAL AREAS 
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CONt/ERT BINARY TO DECIMAL AND TYPE ROUTINE 



SEQ 0076 



5892 

3893 

^894 

3895 

3896 

5897 

3898 

5899 

5900 

5901 

5902 

5905 

5904 

5905 

5906 

5907 

5908 

5909 

5910 

5911 

5912 

5915 

5914 

5915 

5916 

5917 

3918 

5919 

5920 

3921 

5922 

5925 

5924 

5925 

5926 

5927 

5928 

5929 

5950 

5951 

5952 

5955 

5954 

5955 

5956 

5957 

5958 

5959 

5940 

5941 

5942 

5945 

5944 

5945 

5946 

5947 



020742 000004 



tOBLK: 
.SBTTL 



.BLKU 4 

BINARY TO OCTAL C ASCII) ANO TYPE 



i*THlS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-OIGIT 
s*OCTAL (ASCII) fWMBER ANO TYPE IT. 

j»»TYPOS-- ENTER HERE TO SETUP SUPPRESS ZEROS ANO NUMBER OF" DIGITS TO TYPE 
♦CALL : 

NV*1,-(SPJ tsNUMBER TO BE TYPED 

! :CALL FOR TyPEOUT 
N i:N-l TO 6 FOR NUMBER OF DIGITS TO ^yPE 

M i;M-l OR 0 



J* 



MOV 
TYPOS 
.BYTE 
• BYTE 



;!l-TYPE LEADING ZEROS 
: jO-SUPPRESS LEADING ZEROS 



!»$TYPON 













MOV 


NUM.-(SP) 










1* 


TYPOC 




020752 


017646 


000000 




» TYPOS: 


MOV 


a(SP),-(SP) 


020756 


116667 


000001 


000211 




MOVB 


1CSP).»0FILL 


020764 


112667 


000207 






MOVB 


(SP)*.»OMODEa 


020770 


062716 


000002 






ADD 


•2.(SP) 


020774 


000406 








BR 


«TYPON 


020776 


112767 


000001 


000171 


•TYPDC: 


MOVB 


♦I.IOTILL 


021004 


112767 


000006 


000165 




MOVB 


•6.t0M0DE*l 


021012 


112767 


000005 


000154 


»TYPON: 


MOVB 


«5.tOCNT 


021020 


010546 








MOV 


R5.-(SP) 


021022 


010446 








MOV 


R4.-(SP) 


021024 


010546 








MOV 


R5.-(SP) 


021026 


116704 


000145 






MOVB 


«0M00E*1.R4 


021052 


005404 








NEC 


R4 


021054 


062704 


000006 






ADD 


•6.R4 


021040 


110467 


000152 






MOVB 


R4.»0MODE 


021044 


116704 


000125 






MOVB 


$0FILL.R4 


021050 


016605 


000012 






MOV 


12(SP),R5 


021054 


005005 








CLR 


R5 


021056 


006105 






IS: 


ROL 


R5 


021060 


000404 








BR 


S* 


021062 


006105 






2(: 


ROL 


R5 


021064 


006105 








ROL 


R5 


021066 


006105 








ROL 


R5 


021070 


010505 








MOV 


R5.R3 


021072 


006105 






3»: 


ROL 


R3 


021074 


105567 


000076 






DECB 


lOMODE 


021100 


100016 








BPL 


71 


021102 


042705 


177770 






BIG 


«177770.R5 


021106 


001002 








BNE 


4» 


021110 


005704 








TST 


R4 



--ENTER HERE TO TYPE OUT MITH THE SAME PARAMETERS AS THE LAST 
{♦$TYPOS OR $ TYPOC 
.•♦CALL: 

{♦ MOV NUM.-(SP) : I NUMBER TO BE TYPED 

{* TYPON ;;CALL FOR TYPEOUT 

!• 

;^«TYPOC --ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
(♦CALL : 

: {NUMBER TO BE TYPED 
.;CALL FOR TYPEOUT 

iiPICKUP THE MODE 
liLOAD ZERO FILL SWITCH 
isNUMBER OF DIGITS TO TYPE 
i (ADJUST RETURN ADDRESS 

nSET THE ZERO FILL SWITCH 
uSET FOR SIX(6) DIGITS 
»sSET THE ITERATION COUNT 
(sSAVE R5 
:tSAVE R4 
i : SAVE R5 

J (GET THE NUMBER OF DIGITS TO TYPE 

it SUBTRACT IT FOR MAX. ALLOWED 
it SAVE IT FOR USE 
tiGET THE ZERO FILL SWITCH 
iiPICKUP THE INPUT NUMBER 
1 1 CLEAR THE OUTPUT WORD 
tiROTATE MSB INTO "C" 
tiGO DO MSB 
iiFORM THIS DIGIT 



ijGET LSB OF THIS DIGIT 

it TYPE THIS DIGIT? 

iiBR IF NO 

itGET RID OF JUNK 

{{TEST FOR 0 

ii SUPPRESS THIS 0? 



GLOBAL AREAS 
KDJllA.MAC 



MACUl 50A(105^) 
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BINARY to OCTAL C ASCII) AND TtPE 



S£Q O077 



3948 


021 li2 


001403 




3949 


021114 


005204 




3950 


021116 


052703 


000060 


3951 


021122 


052703 


00OC40 


3952 


021126 


110567 


000040 


3953 


021132 


104401 


021172 


5954 


021136 


105567 


000052 


3955 


021142 


003547 




3956 


021144 


002402 




3957 


021146 


005204 




3958 


021150 


000744 




3959 


021152 


012605 




3960 


021154 


012604 




3961 


021156 


012605 




3962 


021160 


016666 


000002 


3963 


021166 


012616 




3964 


021170 


000002 




3965 


021172 


000 




3966 


021173 


000 




5967 


021174 


000 




3968 


021175 


000 




3969 


021176 


000000 




3970 








3971 








3972 








3973 








3974 








3975 








3976 








3977 








3978 








3979 








3980 


021200 


022767 


000176 


3981 


021206 


001074 




3982 


021210 


105777 


177272 


3983 


021214 


100071 




3984 


021216 


117746 


177266 


3985 


021222 


042716 


177600 


3986 


021226 


022726 


000007 


3987 


021232 


001062 




3988 


021234 


126727 


000514 


3989 


021242 


001456 




3990 








3991 


021244 


104401 


021725 


3992 


021250 


104401 


021752 


3993 


021254 


016746 


156716 


3994 


021260 


104402 




3995 


021262 


104401 


021743 


3996 


021266 


005046 




3997 


021270 


005046 




5998 


021272 


105777 


177210 


3999 


021276 


100575 




4000 








4001 


021300 


117746 


177204 


4002 


021504 


042716 


177600 


4003 









000004 



157640 



000001 



BEQ 


5* 


ijBR IF YES 


INC 


R4 


jjOON'T SUPPRESS ANYMORE 0' S 


BIS 


♦•0.R5 


J, MAKE THIS DIGIT ASCII 


BIS 


*• .R3 


jsMAKE ASCII IF NOT ALREADY 


MOVB 


R3.8» 


i;SAVE FOR TYPING 


TYPE 


.8$ 


iiGO TYPE THIS DIGIT 


DECS 


tOCNT 


tiCOUNT BY 1 


BGT 


2» 


II BR IF MORE TO 00 


BLT 


6$ 


II BR IF DONE 


INC 


R4 


IS INSURE LAST DIGIT ISN'T A BLANK 


BR 


2t 


s -.GO DO THE LAST DIGIT 


MOV 


(SP)».R5 


1 s RES TORE R5 


MOV 


(SP)»,R4 


; 1 RESTORE R4 


MOV 


(SP)».R5 


1 iRESTORE R5 


MOV 


2(SP).4(SP) 


iiSET THE STACK FOR RETURNING 


MOV 


(SPV.CSP) 




RTI 


s 1 RETURN 


.BYTE 


0 


1 I STORAGE FOR ASCII DIGIT 


.BYTE 


0 


II TERMINATOR FOR TYPE ROUTINE 


• BYTE 


0 


II OCTAL DIGIT COUNTER 


.BYTE 


0 


ii2ER0 FILL SWITCH 


.WORD 


0 


siNUMBER OF DIGITS TO TYPE 



4$: 



5»! 



7»: 



6$: 



8«: 

lOCNT: 
$0FILL: 
$OMOOE: 

.SBTTL TTY INPUT ROUTINE 
.ENABL LSB 

I*SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
i*ROUTINE IS ENTERED FROM THE TRAP HANDLER. AND WILL 
i*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
:*WHEN OPERATING IN TTY FLAG MODE. 
tCKSWR: 



19t: 
lit 



CMP 


«SWREG.SWR 


Ills THE SOFT-SWR SELECTED? 


BNE 


151 


1 {BRANCH IF NO 


TSTB 


StTKS 


II CHAR THERE? 


BPL 


15« 


siIF NO. DON'T WAIT AROUND 


MOVB 


8ITKB.-(SP) 


1 i SAVE THE CHAR 


BIC 


«tC177.(SP) 


II STRIP -OFF THE ASCII 


CMP 


«7,CSP)» 


i lis IT A CONTROL G? 


BNE 


151 


liNO. RETURN TO USER 


CMPB 


*AUTOe . «1 


It ARE WE RUNNING IN AUTO MODE? 


BEQ 


15$ 


i {BRANCH IF YES 


TYPE 


. ICNTLG 


ilECHO THE CONTROL G (tG) 


TYPE 


,$MSWR 


II TYPE CURRENT CONTENTS 


MOV 


SWREG. -(SP) 


11 SAVE SWREG FOR TYPEOUT 


TYPOC 


nGO TYPE- -OCTAL ASCIKALL DIGITS) 


TYPE 


. tMNEW 


II PROMPT FOR NEW SWR 


CLR 


-CSP) 


1 1 CLEAR COUNTER 


CLR 


-(SP) 


II THE NEW SWR 


TSTB 


StTKS 


iiCHAR THERE? 


BPL 


7$ 


II IF NOT TRY AGAIN 


MOVB 


a»TKB.-(SP) 


J I PICK UP CHAR 


BIC 


iftCl77.(SP) 


siMAKE IT 7-BIT ASCII 



N6 



CLOeAL AREAS 
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TTY INPUT ROUTINE 



SEQ O078 



4004 
4005 
4006 
4007 
4008 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4016 
4017 
4018 
4019 
4020 
4021 
4022 
4023 
4024 
4025 
4026 
4027 
4028 
4029 
4030 
4051 
4032 
4033 
4034 
4035 
4036 
4037 
4038 
4039 
4040 
4041 
4042 
4043 
4044 
4045 
4046 
4047 
4048 
4049 
4050 
4051 
4052 
4053 
4054 
4055 
4056 
4057 
4058 
4059 



021310 
021314 
021316 
021322 
021326 



021330 
021334 
021336 
021342 
021344 
021352 
021356 
021362 
021370 
021372 
021400 
0?1*»C«; 
021406 
021412 
021414 
021420 
021422 
021426 
021432 
021434 
021436 
021440 
021442 
021446 
021452 
021454 
021460 



021462 
021464 
021472 
021476 
021500 
021506 
021514 
021522 
021524 



021627 
001005 
104401 
062706 
000757 



021627 
001022 
005766 
001403 
016677 
062706 
104401 
126727 
001003 
012777 
0O0002 
004767 
0216^7 
002420 
021627 
0030J.5 
0427;>6 
005766 
001A03 
00f316 
00'3316 
0C6316 
0<*S266 
056616 
000707 
104401 
000720 



011646 
016666 
105777 
100375 
117766 
042766 
026627 
001013 
105777 



00002S 

021720 
000006 



000015 

000004 

000002 
000006 
001277 
000367 

000100 

176756 
000060 

000067 

000060 
000002 



000002 
177776 

020522 



9$: 
20t: 

10«: 



CMP 

BNE 

TYPE 

ADD 

BR 



157474 

000001 
177106 



14$: 



15* : 
16i: 



CMP 
BNE 
TST 
BEQ 
MOV 
ADO 
TYPE 
CMPB 
BNE 
MOV 
RTI 
JSR 
CMP 
BLT 
CMP 
BGT 
BIC 
TST 
BEQ 
ASL 
ASL 
ASL 
INC 
BIS 
BR 
TYPE 
BR 

.OSABL LS8 



17$: 



18$: 



{ SP ) . »25 
10$ 

.$CNTLU 

*6,SP 

19$ 



(SP).015 
16$ 
4(SP) 
11$ 

2CSP).SSUR 

•6.SP 

. $CRLF 

$INTAG.#1 

15$ 

«100.8$TKS 

PC.$TYPEC 

(SP).«60 

18$ 

CSP).«67 
18$ 

♦60, (SP)* 

2(SP) 

17$ 

(SP) 

(SP) 

(SP) 

2(SP) 

-2(SP),(SP) 
7$ 

.IQUES 
20$ 



:8lS IT A CONTROL -U? 

I! BRANCH IF NOT 

;}YES, ECHO CONTROL U CtU) 

is IGNORE PREVIOUS INPUT 

siLET'S TRY IT AGAIN 



J ;IS IT A <CR>? 
:: BRANCH IF NO 

jjYES. IS IT THE FIRST CHAR? 

5 I BRANCH IF YES 

: i SAVE NEW SUR 

t s CLEAR UP STACK 

! jECHO <CR> AND <LF> 

J J RE -ENABLE TTY KBD INTERRUPTS? 

tsBRANCH IF NOT 

itRE-ENABLE TTY KBD INTERRUPTS 
M RE TURN 
: ;ECHO CHAR 
jjCHAR < 0? 
t:BRANCH IF YES 
5! CHAR > 7? 
: {BRANCH IF 
: STRIP -OFF 



YES 

{blKXK-ur-l- ASCII 
J IS THIS THE FIRST CHAR 
, jBRANCH IF YES 
It NO. SHIFT PRESENT 

CHAR OVER TO MAKE 
i ROOM FOR NEW ONE. 
i {KEEP COUNT OF CHAR 
:>SET IN NEU CHAR 
i:GET THE NEXT ONE 
5 J TYPE ?<CR><LF> 
; J SIMULATE CONTROL -U 



t i 
i i 
i 



t*THIS ROUTINE WILL 
:*CALL: 

* RDCHR 

* RETURN HERE 
* 



INPUT A SINGLE CHARACTER FROM THE TTY 

:: INPUT A SINGLE CHARACTER FROM THE 
{{CHARACTER IS ON THE STACK 
{ {WITH PARITY BIT STRIPPED OFF 



TTY 







$ROCHR: 


MOV 


(SP),-(SP) 


{(PUSH DOWN THE PC 


000004 


000002 




MOV 


4CSP).2CSP) 


{(SAVE THE PS 


177010 




1$: 


TSTB 


a$TKS 


{ (UAIT FOR 








BPL 


1$ 


tiA CHARACTER 


177004 


000004 




MOVB 


S*TKB.4CSP) 


{{READ THE TTY 


177600 


000004 




BIC 


•tC<177>.4CSP) 


{{GET RID OF JUNK IF ANY 


000004 


000023 




CMP 


4CSP).«25 


{{IS IT A CONTROL S? 








BNE 


3$ 


{ {BRANCH IF NO 


176756 




2$: 


TSTB 


8$TKS 


{{UAIT FOR A CHARACTER 



glosal areas 

KOJllA.MAC 



HACTll S0A(10S2) ^0 MAR 64 11:31 PAGE 79 
20 MAR 64 11:1° TTr INPUT ROUTINE 



StO noT<» 



4060 


021530 


100375 




4061 


021532 


117746 


1 76752 


4062 


021536 


042716 


177600 


406S 


021542 


022627 


000021 


4064 


021546 


001366 




4065 


021550 


000750 




4066 


021552 


026627 


000004 


4067 


021560 


002407 




4068 


021562 


026627 


000004 


4069 


021570 


003003 




4070 


021572 


042766 


000040 


4071 


021600 


000002 




4072 








4075 








40-'4 








4075 








4076 








4077 








4078 








4079 


021602 


010346 




4080 


021604 


012703 


021710 


4081 


021610 


022703 


021720 


4082 


021614 


101405 




408S 


021616 


104410 




4064 


021620 


112613 




4085 


021622 


122713 


000177 


4066 


021626 


001003 




4087 


02U30 


104401 


020522 


4068 


021634 


000763 




4089 


021636 


111367 


000044 


4090 


021642 


104401 


021706 


4091 


021646 


122723 


000015 


4092 


021652 


001356 




4093 


021654 


105063 


177777 


4094 


021660 


104401 


020523 


4095 


021664 


012603 




4096 


021666 


011646 




4097 


021670 


016666 


000004 


4098 


021676 


012766 


021710 


4099 


021704 


000002 




4100 


021706 


000 




4101 


021707 


000 




4102 


021710 


000010 




4103 


021720 


052536 


005015 


4104 


021725 


136 


006507 


4105 


021732 


005015 


053523 


4106 


021 740 


020075 


000 


4107 


021743 


040 


047040 


4108 


021750 


036440 


000040 


4109 


021754 


000 




4110 


021755 


000 




4111 








4112 








4113 








♦ 114 








4115 









000140 
000175 
000004 



000002 
000004 



000 
000012 
020122 



3*: 



BPL 


2* 


ilLOQP UNTIL ITS THERt 


MOVB 


SITKB. CSP) 


liGET CHARACTER 


BIC 


•tCl77.(SP) 


ilMAKE IT 7 BIT ASCII 


CMP 


(SP).,»21 


Ills IT A CONTROL -Q? 


8NE 


21 


II IF NOT DISCARD IT 


BR 


1» 


II YES, RESUME 


CMP 


4(SP).«140 


Ills IT UPPER CASE? 


BLT 


41 


iiBRANCH ir rES 


CMP 


4(SP),#175 


Ills IT A SPECIAL CHAR? 


BGT 


41 


iiBRANCM IF TES 


BIC 


#40.4(SP) 


IlMAKE IT UPPER CASE 


RTI 




iiGO BACK TO USER 



41: 

!*THIS ROUTINE 
I 'CALL : 
I* 
I* 
»• 



WILL INPUT A STRING FROM THE TTy 



ROLIN 
RETURN 



HERE 



»R0LIN: MOV R3.-(SP) 

II: MOV ••TTYIN.RS 

2t: CMP •ITrvIN»e. .R3 

BLOS 4* 

rochr 

MOVB (SP)».{R3) 

101: CMPB #177, (R5) 

6NE 31 

4<: TYPE .lOUES 

BR 1» 

SI: MOVB (RS).9I 

TYPE ,91 

CMPB •15.(R5>* 

BNE 21 

CLR8 -ICRS) 

TYPE , ILF 

MOV (SP)».R3 

MOV (SP).-(SP) 

MOV 4{SP).2{SP) 

MOV »ITTYIN,4(SP) 
RTI 

91: .BYTE 0 

.BYTE 0 

ITTYIN: .BLKB 8. 

ICNTLU: .ASCIZ /♦U/<15><12> 

ICNTLG: .ASCIZ /tG/*15><12» 

•MSUR: . ASCIZ <15><12>/SUR > 



IIINPUT A STRING FROM THE TTt 

llADORESS OF FIRST CHARACTER WILL BE ON THE "iTACK 
1 1 TERMINATOR WILL BE A BYTE OF ALL O S 

1 1 SAVE R3 
iiGET ADDRESS 
llBUFFER FULL? 
iiBR IF YES 

iiGO READ ONE CHARACTER FROM THE TTt 
liGET CHARACTER 
Ills IT A RUBOUT 
1 1 SKIP IF NOT 
1 1 TYPE A • ? 

1 1 CLEAR THE BUFFER AND LOOP 
1 1 ECHO THE CHARACTER 

1 1 CHECK FOR RETURN 
liLOOP IF NOT RETURN 
1 1 CLEAR RETURN (THE 15) 
1 1 TYPE A LINE FEED 
iiRESTORE RS 

I {ADJUST THE STACK AND PUT ADDRESS OF THE 
ti FIRST ASCII CHARACTER ON IT 

1 1 RE TURN 

iiSTORAGE FOR ASCII CHAR, TO TtPE 
1 1 TERMINATOR 

ilRESERVE 8 BYTES FOR TTy INPUT 
ilCONTROL 'U" 
llCONTROL "G- 



0S3S0S IHNEU: .ASCIZ / NEU • / 



IAUT06: .BYTE 0 
IINTAG: .BYTE 0 
.SBTTL TRAP DECODER 



, I AUTO MODE FLAG 

1 1 INTERRUPT MODE FLAG 



UthIS ROUTINE WILL PICKUP THE LOUER 8>TE OF THE 'TRAP' INSTRUCTION 
i*Ar4} USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 



JO 



80 



4116 

4117 

4116 
4119 
41^0 
4121 
4122 
4125 
4124 
4125 
4126 
4127 
4126 
4129 
4130 
4131 
4132 
4133 
4134 
4135 
4136 
4137 
413S 
4159 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4140 
4149 
4150 
4151 
4152 
4153 
4154 
4155 
4156 
4157 
4158 
A 159 
4160 
4161 
4162 
4163 
4164 
4165 
4166 
4167 
4168 
4169 
4170 
4171 



021756 010046 

021760 016600 000002 

021764 005740 

021766 111000 

021770 006500 

021772 016000 022012 

021776 000200 



022000 011646 

022002 016666 000004 000002 
022010 000002 



022012 
022014 
022016 
022020 
022022 
022024 



022000 
020152 
020776 
020752 
021012 
02Cb26 



I •OF 
i*GO 

(TRAP; 



THE DESIRED ROUTINE. 
TO THAT ROUTINE. 



THEN USING THE ADDRESS OBTAINED K WH 



MOV RO. (SP) 

MOV 2(SP),R0 

TST CRO) 

MOVB (RO).RO 

ASL RO 

MOV $TRPAD(RO).RO 

RTS RO 



1 1 SAVE RO 

1 1 GET TRAP ADDRESS 

llBACKUP BY 2 

nGET RIGHT BYTE OF TRAP 

nPOSITION rOR INDEXING 

1 1 INDEX TO TABLE 

t iGO TO ROUTINE 



1 1 THIS IS USE TO HANDLE THE "GETPRl" MACRO 



$TRAP2: MOV 
MOV 
RTI 



(SP).-CSP) 
4(SP).2(SP) 



ilMOVE THE PC DOUN 
1 1 MOVE THE PSU DOWN 
I {RESTORE THE PSU 



.MACRO SET TRAP A.B.MSG 

IISET A,B,\«TRAP»$TRP>,\»TRP,'MSG» 

.NLIST 
ITRP-ITRP.l 

.LIST 

.ENOM SET TRAP 
.MACRO tISET 
.ir EQ «TRP-1 
.S8TTL TRAP TABLE 



A.B.C.D.COMNT 



TRAP.DCC) 



COMNT 



I*THIS TABLE CONTAINS THE STARTING ADDRESSES OT THE ROUTINES CALLED 
I ♦BY THE "TRAP" INSTRUCTION. 

I ROUTINE 

ITRPAO: .WORD •TRAP2 

.ENDC 

.Iir NDF GNS,. NLIST 

A- C 
.IIF NDF GNS.. LIST 

B 1 1 CALL 'A 

.ENOM USET 
.MACRO TRMTRP 
♦TERM-. tTRPAO 
.ENOM TRMTRP 
.SBTTL TRAP TABLE 

.♦THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
j^BY THE "TRAP" INSTRUCTION. 

I ROUTINE 

.WORD 
ITYPE 
ITyPOC 
♦TYPOS 
ITYPON 
ITrPOS 



ITRPAO: 



< TRAP2 

I, CALL -TYPE 

I jCALL-TyPOC 

, I CALL 'TYPOS 

ilCALL-TYPON 

liCALL-TYPDS 



TRAP. 1(104401) 
TRAP ♦2(104402) 
TRAP •3(104405) 
TRAP. 4(104404) 
TRAP.5( 104405) 



TTY TyPEOUT routine 

Type OCTAL NUMBER (UlTM LEADi»«S ZEROb^ 
TYPE OCTAL NUMBER (NO LEADING ZEROb ^ 
TYPE OCTAL NUMBER (AS PfR I AST CALL ^ 
TYPE DECIMAL NLiMBER (UITh MGN) 



OL OB Al, 

kDjIIA, 



0/ 



AHLAs 
MAC 



JO 



FO O081 



• 172 
4175 
41 74 
4175 
4176 
4177 
4178 
4179 
4100 
4101 
4102 
4183 
4184 
4185 
4186 
4187 
4188 
4189 
4190 
4191 
4192 
4193 
4194 
4195 
4196 
4197 
4198 
4199 
4200 
4201 
4202 
4203 
4204 
4205 
4206 
4207 
4208 
4209 
4210 
4211 
4212 
4213 
4214 
4215 
4216 
4217 
4218 
4219 
4220 
4221 
4222 
4223 
4224 
4225 
4226 
4227 



022026 021250 



•GTSUR iiCALL-CTSUR 



TRAP. 6(104406) GET SOFT 5UR SETTING 



022030 
022032 
022054 



021200 
021462 
021602 



ICKSWR 
IROCHR 
IRDLIN 



I iCALL-CKSUR 
t iCALL-ROCMH 
I iCALL-ROLiN 



.SBTTL APT COMMUNICATIONS ROUTINE 



TRAP. 7(104407) TEST FOR CHANGE IN SOf T SwR 
TRAP. 10( 104410) TTr TvPEIN CHARACTER R0«JTINF 
TRAP. IK 104411) TTr TYPEIN STRING ROUTINE 



i > ' 



022036 


112767 


000001 


000236 


♦ATYl: 


MOVB 


♦I.IFFLG ; 


J TO REPORT FATAL ERROR 


022044 


112767 


000001 


000226 


♦ATY3: 


MOVB 


•1. IMFLG 1 


|T0 TYPE A MESSAGE 


022052 


000403 








BR 


lATvC 




022054 


112767 


000001 


000220 


•ATY4; 


MOVB 


OI.IFFLG 1 


|T0 ONLY REPORT FATAL ERROR 


022062 








»ATYC: 








022062 


010046 








MOV 


RO , - ( SP ) 1 


I PUSH RO ON STACK 


022064 


010146 








MOV 


Rl,-(SP) 1 


iPUSH Rl ON STACK 


022066 


105767 


000206 






TSTB 


IMFLG 1 


1 SHOULD Type a message? 


022072 


001450 








BEQ 


51 1 


lIF NOT: BR 


022074 


122767 


000001 


156716 




CMPB 


•APTENV.IENV 1 


1 OPERA TING UNDER APT? 


022102 


001031 








6NE 


3t 1 


|IF NOT: BR 


022104 


132767 


000100 


156707 




BITB 


•AP T SPOOL. tENVH i 


1 SHOULD SPOOL MESSAGES? 


022112 


001425 








BEQ 


3» 1 


iIF NOT: BR 


022114 


017600 


000004 






MOV 


fi4(SP).R0 i 


iG' T MESSAGE ADDR. 


022120 


062766 


000002 


000004 




ADD 


•2.4CSP) 

IMSGTyPE I 


1 iBUMP RETURN ADDR. 


022126 


005767 


156646 




1*: 


TST 


»SEE IF DONE U/ LAST XMISSION? 


022132 


001375 








BNE 


1* 1 


J IF NOT: WAIT 


022134 


010067 


156654 






MOV 


RO.IMSGAO i 


(Put ador in mailbox 


022140 


105720 






2t: 


TSTB 


(RO). 1 


iFIND END OF MESSAGE 


022142 


<X)1376 








BNE 


2i 




022144 


166700 


156644 






SUB 


IMSGAO.RO t 


iSUB START OF MESSAGE 


022150 


006200 








ASR 


RO 1 


iGET MESSAGE LNGTh IN WORDS 


022152 


010067 


156640 






MOV 


RO.tMSGLGT i 


iPUT LENGTH IN MAILBOX 


022156 


012767 


000004 


156614 




MOV 


•4,$MSGTyPE I 


iTELL APT TO TAKE MSG. 


022164 


000413 








BR 


5» 




022166 


017667 


000004 


000016 


31: 


MOV 


»4<SP).4$ t 


iPUT MSG ADDR IN JSR LINKAGE 


022174 


062766 


000002 


000004 




AOO 


♦2.4(SP) 


1 iBUMP RETURN ADDRESS 


022202 


016746 


155570 






MOV 


177776, -(SP) t 


iPUSM 177776 ON STACK 


022206 


004767 


175740 






JSR 


PC.ITYPE I 


iCALL Type MACRO 


022212 


000000 






41: 


.UORO 


0 




022214 








5»: 








022214 


105767 


000062 




101: 


TSTB 


•FFLG 1 


iSHQULD REPORT FATAL ERROR? 




001410 








OCA 


121 1 


t Ir NU 1 : on 


022222 


005767 


156572 






TST 


•ENV 1 


{RUNNING UNDER APT? 


022226 


001413 








BEQ 


12* 1 


1 IF NOT • BR 


022230 


005767 


156544 




lit: 


TST 


•MSGTYOE I 


iFINISHEO LAST MESSAGE? 


022234 


001375 








BNE 


11* t 


iIF NOT: WAIT 


022236 


017667 


000004 


156SS6 




MOV 


84(SP).IFATAL i 


iGET ERROR « 


022244 


062766 


000002 


000004 




AOO 


•2.4(SP> 


it BUMP RETURN ADDR. 


022252 


005267 


156522 






INC 


•MSGTyPE I 


J TELL APT TO TAKE ERROR 


022256 


105067 


000020 




12«: 


CLR8 


•FFLG 1 


J CLEAR FATAL FLAG 


022262 


105067 


000013 






CLR6 


tLFLG t 


tCLEAR LOG FLAG 


022266 


105067 


000006 






CLRB 


•MTLG 1 


iCLEAR MESSAGE FLAG 


022272 


012601 








MOV 


(SP)..Rl 1 


iPOP STACK INTO Rl 


022274 


012600 








MOV 


(SP)».RO 1 


{POP STACK INTO RO 


022276 


000207 








RTS 


PC 1 


1 RE TURN 


022300 


000 






IMFLG: 


.BYTE 


0 1 


iMESSG. FLAG 



E 7 



GLOBAi ARIAS 
KOJllA.MAC 



4;?2« 

4229 
4230 
4251 
4232 
4233 
4234 
4235 
4236 
4237 
4230 
4239 
4240 
4241 
4242 
4243 
4244 
4245 
4246 
4247 
4246 
4249 
4250 
4251 
4252 
4253 
4254 
4255 
4256 
4257 
4256 
4259 
4260 
4261 
4262 
4263 
4264 
4265 
4266 
4267 
4266 
4269 
4270 
4271 



022301 
022502 



MAC 11 1 50A(1052) 
20-MAR-84 11:19 

000 
000 
022304 
000200 
000001 
000100 
000040 



PO 



HAR 84 

APT 



11:51 PAGE 82 
COMMUNICATIONS ROUTINE 



SEQ n082 



ILFLG: .BYTE 
♦FFLG: .BYTE 
.EVEN 
APTSIZE-200 
APTENV-001 
APTSPOOL-lOO 
APTCSUP-040 



0 
0 



IjLOG FLAG 
llFATAL FLAG 



1 1 < 



(THIS ROUTINE WILL INCREMENT THE ERROR COUNT AND THEN PASS THE UTilOUE 
lERRQR NUMBER TO THE APT ERROR ROUTINE TO BE REPORTED TO THE APT SYSTEM. 







156542 




lERROR • 


INC 


lERFLG 


{INCREMENT ERROR FLAG 




001775 








BEQ 


f ERROR 


lOON' T LET IT GO TO 7ER0 


oppxip 


005267 


156526 






INC 


ERRCNT 


•INCREMENT THE ERROR COUNT 




VC ^wc ( 


001002 






CMP 


(SP5. ^1002 


lis ERROP FROM VECTOR AREA 


vcc ^cc 


A V AV X V 








BHI 


I % 


iIF YES THEN 


0PPSP4 


012767 

VAC* ' V • 


007777 


000106 




MOV 


•7777, 3» 


(REPORT AN UNEXPECTED TRAP 


OPP5SP 


012637 


001062 






hOV 


(SP)* .MSAVSPl 


iSAVE UNEXPECTED TRAP DATA 


022336 


012637 


001064 






MOV 


(SPl* .MSAVSP2 


lAND RESTORE SP 


0PP54P 


000430 








BR 


2$ 


iELSE 




017667 

VA • w • 


OOOOOO 

www 


000066 

WW^W 


* ~ • 


MOV 


fi( SP ) , 3 1 


xREPORT UNIQUE ERROR NUMBER TO APT 


0PP5SP 

VC C ^ -■'C 


011667 

V A AW f 


000072 

WW t c 






MOV 


(SP) 101$ 


I SAVE ERROR PC 


vcc i^^V 


062716 

>^DC ' XV 


O0OO02 
wwvc 






ADD 


•2 ( SP ) 


iGET OVER UNIQUE ERROR NUMBER FOR RETURN 


022362 

VCC */vc 


017637 


OOOOOO 

www 


022372 

VC c ■ c 


1001 • 

• W 9 » 


MOV 


a(SP).M102l 




022370 

VCC 1^ ( V 


104401 








TYPE 




■ TYPE ERROR MESSAGE 


OPP57P 

VC c * c 


oooooo 






1021 • 

& VC V • 


WORD 


0 




022374 


062716 


000002 






ADO 


♦2.(SP) 


:GET OVER ERROR MESSAGE 


022400 


104401 


001246 






TYPE 


.ERRl 


tPUSH UNIQUE ERROR NUMBER ON THb STACK 


022404 


016746 


000030 






MOV 


3$.-CSP) 


0224 10 


104402 








TYPOC 




(TYPE OCTAL ERROR NUMBER 


022412 


104401 


001262 






TYPE 


.ERR2 


!puSH ERROR PC ON THE STACK 


022416 


016746 


000026 






MOV 


101$. -(SP) 


022422 


104402 








TYPOC 




jTYPE THE ERROR PC 


022424 


122767 


000001 


156366 


2<: 


CMPB 


•APTENV.IENV 


{CHECK TO MAKE SURE UE'RE IN APT MODE 


022432 


001004 








BNE 


51 


;IF YES THEN 


022434 


004767 


177414 






JSR 


PC, $ATt4 


{GO REPORT ERROR TO APT 


022440 


OOOOOO 






3»: 


.WORD 


0 


{STORAGE FOR ERROR NUMBER 


022442 


000777 






4»: 


BR 


4S 


{LOOP HERE AFTER REPORTING ERROR TO APT 


022444 


OOOOOO 






5$: 


HALT 




J IF NOT APT THEN HALT 


022446 


000002 








RTI 




sALLOU RECOVERY FROM HALT 


022450 


OOOOOO 






101 »: 


.WORD 


0 




022452 








tPATCH: 








022452 


000010 
000001 






.END 


' .BLKM 


10 





GLOBAL 


AR(AS MACUl 


J0AC1052) 


20 Ml 


KOJl lA. 


HAC t?0 nAR 84 


11 : 19 




ABASE ■ 


000000 


576 




A80RT0 


012214 


2385 


2509* 


ABORT 1 


012402 


2394 


2571* 


ACOUl • 


000000 


576 




ACDU2 ■ 


000000 


576 




ACPUOP" 


000000 


576 


591 


AOOTRP 


001454 


7S6» 


840 


ADDUO • 


000000 


576 




AODUl « 


000000 


576 




AOOUIO* 


000000 


576 




ADOWll- 


000000 


576 




A00U12* 


000000 


576 




AOOUIS- 


000000 


576 




A00U14* 


000000 


576 




A00U15' 


000000 


576 




A00U2 • 


000000 


576 




A00U5 • 


000000 


576 




A00U4 • 


000000 


576 




A00U5 • 


000000 


576 




A00U6 - 


000000 


576 




A00U7 ■ 


000000 


576 




A00U6 * 


000000 


576 




A00U9 • 


000000 


576 




ADEVCT* 


000000 


576 
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AOEVM • 


000000 


576 




AENV " 


000000 


576 


587 


AENVM » 


000000 


576 
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AFATAL" 


000000 


576 


579 


ALLCTR 


001056 
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576 
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000000 


576 
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576 
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000000 


576 
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000000 


576 
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576 




AMAI1S4 ■ 
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576 
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576 
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576 
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000000 


576 
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AMTrP2* 


000000 
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576 




APASS « 


000000 


576 


581 


APRIOR" 


000000 


576 


APTCSU* 
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000040 


3749 


4234* 


APTENV* 


000001 


3742 
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000200 
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APTSPO* 
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BITOO 

BITOl 

BIT02 

BIT05 

BIT04 

BIT05 

BIT06 

BIT07 

BIT08 

BIT09 

BITl 

BITIO 

BITll 

BIT12 

BIT15 

BIT14 

8IT15 

BIT2 

BIT3 

BIT4 

BITS 

BIT6 

BIT? 

BITS 

BIT9 

BNO 

BNl 

BOAROT 
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CACHET 

CCR 

CKSUR 
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CPEREG 

CPUTST 

CR 

CRLF 

DA TRAM 
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DOISP 

DISPLA 

DISPRE 

DSUR 

EMTVEC 

ERRCHT 

ERRMSG 

ERRNUn 



177546 
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000010 
000020 
000040 
000100 
000200 
000400 
001000 
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002000 
004000 
010000 
020000 
040000 
100000 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
012144 
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000001 
000014 
000001 

L77746 

104407 

001040 

177766 

000001 

000015 
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000001 
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177570 
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000030 

001044 
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000321 
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307* 
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306* 
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301* 
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2393 
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3666 
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224* 
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230« 
614* 
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942 
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502 
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3311 
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3025 



2552* 
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668 
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538 
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659 


668 


3718 


3970 
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836* 


861* 


3085* 


3305* 


3311 


3327* 
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538 


634 


663 


824 


3706 
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659 


663 


668 
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673 


3706 


3714 


5805 


3759 


3817 
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614 


782 
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790* 
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613 


781 
















770* 
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897 


900* 
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906* 
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960* 
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986* 


996 
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1058 
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1068* 


1076 
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1098 


1101* 


1108 


1111* 


1115 


1118* 


1125 


1128* 


1149 


1152* 


1157 


1160* 


1184 


1187* 
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1195* 


1200 


1220* 


1225 
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1242 


1245* 


1251 


1254* 


1296 
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1316 
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000004 


5114 
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001246 
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001262 
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001034 
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FLOAT 


001100 
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000244 
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000020 
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4604 
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172564 


4614 
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172566 


4624 
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172570 
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4644 
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1S624 


1567 


13704 


1373 


1440 


14454 


1446 


14494 


14664 


1469 


14924 


1508 


1557 


15604 


1563 


15664 


16244 


1627 


16304 


1634 


1671 


16744 


1677 


16604 


17594 


1744 


17474 


1751 


1767 


17904 


1794 


17974 


18544 


1857 


16404 


1644 


1876 


16814 


1910 


19134 


19474 


1955 


19584 


1962 


1999 


20024 


2006 


20094 


20714 


2075 


20784 


2061 


2116 


21214 


2125 


21284 


21684 


2172 


21754 


2178 


2266 


22914 


2295 


22964 


25554 


2559 


25624 


2424 


2660 


26654 


2666 


26694 


26144 


2817 


26204 


2623 


5055 


50564 


5044 


50474 


51904 


5515 


55164 


5518 


5457 


54604 


5465 


54664 


55194 


5524 


55284 


5552 


5562 


55654 


5568 


55714 


56184 


5622 


36254 


5628 


779 


780* 


791* 




4255 








4258 








741 


762* 


S58* 


665* 


2218* 


2250* 


2250* 


22S4 


2599* 


2607* 


2620* 


2651* 


2765* 


27 70* 


2777* 


2784* 


895* 


894 


954 


978 


880 


M5 


955 


948 


185 


195 


206 


558 


4167 


4168 


4169 


4170 


41754 








5757 


5815 






500 


655 


809 


5678 


805* 


806* 







USER STMOOLS 



13764 


1412 


141 S4 


1 4 1 A 

A"* Aw 


14^ 


1A*>7# 

A^ J ' w 


1 4#in 

X~wv 


A**w9w 


15114 


1517 


1^P04 


A .JCW 


1569 


15724 




AWWi^w 


16374 


<LO~W 


Aw~ i^w 


1 AS1 
Aw J A 


1666 


A WW 




Aw 


17544 


1757 


17604 

A ' Www 


1 

A * w^ 


1600 


16054 


1607 


1A104 

A W A Ww 


18474 


1850 


18534 


1859 

Av^7 


1916 


19214 


1925 


19264 


19654 


1966 


19714 


1975 

A » ' J 


2015 


20164 


2022 


20254 


20844 


2067 


20904 


2094 


2136 


21394 


2143 


21464 


21614 


2256 


22594 


2265 


2301 


23044 


2353 


23564 


24274 


2431 


24344 


2438 


2672 


26754 


2676 


26614 


26264 


2661 


26644 


2665 


5055 


50564 


5066 


50694 


55214 


5525 


55264 


5591 


5475 


54764 


5485 


54894 


55554 


5556 


55414 


3544 


5576 


55794 


5588 


55914 


36514 


5654 


56574 


5640 


1172* 


1265* 


1505* 


1547* 


2286 


2515* 


2526* 


2550 


2644* 


2658 


2695* 


2720* 


2791* 


2798* 


2809 


2841* 


991 


1004 


1017 


1052 


965 


1051 


1071 


1104 


652 


640 


641 


668 


4171 


4175 


4175 


4176 


5694 


5706 


5719 


5970 
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1 Aoa 

l*CO 




14 yd 








f A 7 A * 








1 1 


1 AOA 
AwwO 


1 f«1 1 A 




1 £. 1 AA 








lOO^ 


Aw~^ 




1 r w3 


1 7 AAA 


A r OwV 


1 77ft 


1 77XA 


1 77fe 


1 A1 ^ 

Aw A J 


1 A1 


1 A^A 




1 AAP4 

A wOc w 


1 fU>A 


1 AJ^OA 

1007W 


1 A75 


IQ^I 
A 7 J A 


1 


1 QX7 


1 QAHA 


1Q7AA 


1 TOO 


1 70 7W 


1 QQX 


POPA 
cwc w 








CW~ • w 


21 


Ot OA* 


c i ic 


P14Q 
c A"* 7 


21 *%2A 


91 Si^ 


Cl3^» 


£CWWw 


CC07 


CC r cw 


337^ 


PX40 






3 VAQ* 


P441 A 




C^^ ' w 


3A^(^ 
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97X7 

C r J f 


3 7AnA 


C Wwww 






A 


5116 


51214 


3181 


31844 


53944 


5412 


34154 


3426 


5496 


34994 


5506 


35094 




3550 


3S^34 




5594 


55974 


3600 


36034 


56454 


3646 


36494 


3654 


1581* 


1719* 


1892* 


2042. 


2375* 


A J* 


2422 


3424 
c^^c ~ 


2725 


2751* 


2735 


2741* 
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5558* 


3445* 
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1158 
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5706 


3716 


4177 
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K0P0A2 
KOPORS 
K0P0A4 
K0P0R5 
K0P0R6 
K0POR7 
KIPARO 
KIPARI 
KIPAR2 
KIPAR5 
KIPAft4 
KIPAR5 
KIPAR6 
KIPAR7 
KIPORO 
KIPORl 
KIP0R2 
KIPORS 
KIP0R4 
KIP0R5 
KIP0R6 
KIP0R7 

LOOPIN 
MMTSIO 
MMT511 
«nTSl2 
MMTSIS 
MHTS14 
MMTSIS 
riHTSl6 
nHTS6A 
MriTS68 
MMTS6C 
MMTS60 



172524 
172326 
172550 
172552 
172554 
172536 
172540 
172542 
172544 
172546 
172550 
172552 
172554 
172556 
172500 
172502 
172504 
172506 
172510 
172512 
172514 
172516 
000012 
001060 
****** U 

****** u 
****** u 
****** u 
****** u 
****** u 

****** u 

****** u 

**••** u 
****** u 
****** u 

001506 



muERR 001215 



439# 
440* 
441« 
442« 
445* 
444* 
448* 
449* 
450* 
451* 
452* 
455* 
454* 
455* 
426* 
427* 
420* 
429* 
450* 
451* 
452* 
455* 
22£* 
619* 
2592 
2666 
2745 
2652 
3076 
5331 
3436 
1574 
1712 
1685 
2035 



5090* 



2992* 
3091* 



3095* 
653 



5010* 5028* 5059* 5050* 5061* 5092* 5501* 



659 



663 



668 



670 



675 



5706 



5714 



5809 



5817 



MnuTRP 001460 



695* 


1569 


1725 


1696 


2048 


21^ 


2216 


2321 


2560 


2603 


2615 


2628 


2642 


2716 


2754 


2643 


3104 


5300 


333<» 


3447 














663* 


745 


651 


699 


905 


915 


928 


944 


959 


972 


965 


998 


1011 


1023 


1034 


1046 


1060 


1067 


1076 


1065 


1093 


1100 


1110 


1117 


1127 


1154 


1144 


1151 


1159 


1166 


1194 


1202 


1210 


1219 


1227 


1244 


1253 


1298 


1504 


1312 


1318 


1326 


1332 


1340 


1546 


1355 


1361 


1369 


1375 


1414 


1420 


1428 


1434 


1442 


1446 


1456 


1462 


1471 


1477 


1465 


1491 


1510 


1519 


1526 


1557 


1553 


1559 


1565 


1571 


1602 


1610 


1617 


1623 


1629 


1636 


1642 


1655 


1660 


1666 


1675 


1679 


1666 


1695 


1701 


1707 


1738 


1746 


1753 


1759 


1765 


1772 


1778 


1769 


1796 


1602 


1809 


1815 


1626 


1635 


1639 


1646 


1852 


1861 


1868 


1874 


1660 


1912 


1920 


1927 


1933 


1939 


1946 


1957 


1964 


1970 


1977 


1968 


1995 


2001 


2006 


2017 


2024 


2030 


2062 


2070 


2077 


2063 


2089 


2096 


2107 


2114 


2120 


2127 


2136 


2145 


2151 


2156 


2167 


2174 


2160 


2256 


2265 


22'1 


2277 


2290 


2297 


2303 


2335 


2542 


2346 


2354 


2361 


2426 


2435 


2440 


2446 


2452 


2662 


2666 


2674 


2660 


2727 


2739 


2613 


2619 


2825 


2865 


2665 


5004 


3020 


3055 


3046 


3057 


3068 


3120 
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3515 
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3414 


3450 


3459 


3467 


3475 
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3496 
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3516 


3527 


5534 


3540 


3546 


3552 


3556 
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3564 


5570 


3578 


5590 


3596 


3602 


5617 


3624 


5650 


5656 


5642 


5649 


741* 
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195 
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810 


824 





ULOeAi AREAS 
KOJllA.HAC 



HACUl 50A(1052) 
20 MA» 84 11:19 



?0 



MAR 84 11:51 PAGt 88 
CROSS REFERENCE TABLE 



J/ 
USER SrMBOLS 



SCO n087 











5970 




MMUTSl 






u 


850 




Mm.»TS2 


• 




u 


855 




MMUTS5 


■ 




u 


1165 




MMUTS4 


m 






1256 




HMUTS5 


m 




u 


1496 






m 




u 


1540 




MMUTS7 


m 




0 


2185 




MTHJTSS 


m 
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020046 
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011160 




2274 
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001546 
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011104 
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001450 
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5108 


3152 
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001452 
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001406 
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705 
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001410 




718# 


721 


PHY 1 




014502 




2850 
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177 772 




228# 
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■ 


000240 




522# 




PLr 0 




012072 




2561 


2466# 


PL* I 




012264 




2592 


2403 
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PRO 
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000000 
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PHI 




000040 




246# 
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000200 
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RCSR • 
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ROLIN - 
RE COAT 
RESTAR 
RESVEC- 
SAvriRO 



177560 
104410 
104411 

001036 
002066 
000010 
001072 



SAvMRl 001074 
SAVMR2 001076 



SAVSPl 

SAVSP2 

SAVSUP 

SAVUSE 

SDPARO 

SOPARl 

S0PAR2 

S0PAR3 

S0PAR4 

SDPARS 

S0PAR6 

S0PAR7 

SDPORO 

SOPOR 1 

S0P0ft2 

S0PDR3 

S0P0R4 

SOPORS 

S0P0R6 

SOPOR 7 

SHMOO 

SIPARO 

SIPARl 
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001062 
001064 
001066 
001070 
172260 
172262 
172264 
172266 
172270 
172272 
172274 
172276 
172220 
172222 
172224 
172226 
172230 
172232 
172234 
172236 
000001 
172240 
172242 
172244 
172246 
172250 
172252 
172254 
172256 
172200 
172202 
172204 
172206 
172? 10 
172212 
172214 
172216 
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001030 
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SRI • 177574 
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41774 
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8214 
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2435* 
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626* 

2684* 
6204 
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2316* 


2336* 


2337 


2376* 


2436 


2455* 


2600* 


2664 


2682* 


3596 














759* 


2196* 


2227* 


2267 


2280* 


2299 


2319* 


2345 


2577* 


24«2 


2456* 


2601* 


2683* 


2753* 


2615 


2827* 


















760* 


2197* 


2228* 


2273 


2261* 


2320* 


2349 


2378* 


2446 


2457* 


2602* 


2676 


2821 


2628* 


3592 




















4245* 
























4246* 
























1587* 


1613 


1723* 


1749 


1696* 


1923 


2046* 


2075 










1584* 


1606 


1721* 


1742 


1894* 


1916 


2044* 


2066 











565 



3560* 



36814 

2765* 

5528 

2968* 

1504 

3196* 



3706 



2772* 2779* 2786* 2793* 2800* 2821 2967« 3073 3086* 3100 



3074 3087* 3101 
1513 1522 1531 
3304* 3326* 5659* 



3201 

2993* 3016* 3032* 5043* 



3054* 3065* 3070. 



3200 
5064 • 
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20 MAR 




KOJllA. 
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CROSS t 


SR^ 


177576 


533» 






SR5 


172S16 


334« 


2991» 


3009* 


STACK • 


001000 


216* 


768 




START 


001604 


521 


527 


765* 


STBOT • 


001000 


499« 


1583 


1586 


STKLHT- 


177774 


22 7# 






SUR 


001046 


613* 


781* 


783 


SUREG 


000176 


525# 


789 


815 


suo 


000001 








suoo • 


000001 


2709 


280 




SUOl • 


000002 


2699 


279 




SU02 ' 


000004 


268« 


278 




SU03 • 


000010 


26 7« 


277 




SU04 • 


000020 


266« 


276 




SW05 • 


000040 


265* 


275 




SW06 • 


000100 


264* 


274 




SU07 • 


0C0200 


263* 


273 




suoe > 


000400 


262* 


272 




«;uo9 • 


001000 


261* 


271 




SWl 


000002 


279* 






SUlO - 


002000 


260* 






SUll • 


004000 


259* 






SU12 « 


ClOOOO 


258* 






SU13 « 


020000 


257* 






SW14 « 


040000 


256* 






SU15 - 


100000 


255* 






SU2 


000004 


278* 






SW3 


000010 


277« 






SU4 


000020 


276* 






SW5 


000040 


275* 






SU6 


000100 


274* 






SU7 


000200 


275* 






SW8 


000400 


272* 






SU9 


001000 


271* 






TAGRAH- 


000001 


1* 


810 




TBITVE- 


000014 


313* 






TKVEC - 


000060 


320* 






TMM16A 


017214 


5455 


3530* 




TMril6B 


017054 


5455 


3493* 




TMM16C 


017110 


3461 


3503* 




TMM160 


017144 


3469 


3513* 




TMM16E 


017200 


5446 


3523* 


3542 


TMMieP 


017202 


5524* 


3581 




TMieA 


017710 


3490 


3529 


3619 


TPVEC ■ 


000064 


321* 






TRAPVE" 


000054 


319* 


772* 


773* 


TRTVEC- 


000014 


314* 






TSMA 


011214 


2287 


2292* 




TSMB 


011240 


2294 


2299* 




T5MC 


011254 


2300 


2305* 




TSMMUl 


002100 


830* 






TSHMU2 


002174 


855* 






TS^»1U3 


003550 


1165* 






TSMMU4 


004114 


1258* 






TSMMU5 


005210 


1496* 






TSMM»J6 


005366 


1540* 







USER SYMBOLS 



S£Q O089 



3025* 5096* 5660* 



3005 

789* 

3980 



3072 

805* 
5995 



815 



2970 



5980 



4017* 



3548 

3653 



3658* 
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TSMMU7 


010572 


2165* 


TSMMU8 


0112S6 


2306« 


TSMMU9 


011522 


2566« 


TSMMIO 


012450 


2592# 


TSMMll 


013064 


266a« 


TSMM12 


013356 


2745# 


TSMM15 


013742 


2652« 


TSMM14 


015064 


50769 


TSMM15 


016250 


3351# 


TSMM16 


016610 


3438« 


TSMM6A 


005520 


1574# 


TSMM68 


006262 


1712* 


TSMM6C 


007152 


1885« 


TSMH60 


007762 


2035« 


TSM16A 


016714 


3461« 


TSM16B 


016746 


3469# 


TSM16C 


016776 


3477# 


TSM16D 


017042 


3485* 


TSM7 


011176 


2222 


TSM9 


011662 


2385 


TSTLOC 


001120 


639* 


TSTl 


002100 


834« 


TSTIO 


006262 


1716* 


TSTll 


007152 


1889* 


TST12 


007762 


2039« 


T5T13 


010572 


2189* 


TST14 


011256 


2312* 


TST15 


011522 


2372* 


TST16 


012450 


2596* 


TST17 


013064 


2692* 


TST2 


002174 


859* 


TST20 


013356 


2749* 


TST21 


013742 


2838* 


TST22 


014366 


2968* 


TST23 


015064 


3082* 


TST24 


016106 


3298* 


TST25 


016250 


3335* 


TST26 


016610 


3442* 


TST3 


003550 


1169* 


TST4 


004114 


1262* 


TST5 


005210 


1500* 


TST6 


005366 


1544* 


TST7 


005520 


1578* 


TSIO 


012762 


2612 


TSll 


013206 


2700 


TS12 


013660 


2767 


TS14 


015500 


3134 


TS15 


016420 


3342 


TS16 


017564 


3610 


TS16A 


017552 


3614* 


TS1822 


014566 


2960* 


TS7 


011046 


2202 


TS7F1N 


011256 


2246 


TS9riN 


012450 


2409 


TYPOS - 


104405 


3692 


TYPE . 


104401 


809 



M7 
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3502 
3512 
3522 
3560 

2234 2266* 

2395 2413* 2463 



2625 


2636 


2650 


26S8* 


2705 


2710 


2716* 




2774 


2781 


2788 


2795 


3156 


3167* 






3350 


3359 


3384* 




3620* 








3638 








2209 


2250* 






2307* 








2591* 








4171* 








3680 


3690 


3693 


3762 



2802 2809* 



3864 3953 3991 3992 3995 4008 4019 4038 
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4087 


TyPOC • 


104402 


3994 


TtPON • 


104404 


41704 






4169* 




013064 


2653 




013336 


2712 


T12FIN 


013742 


2805 




V i ^ www 


2889 


T14 


015524 


3152 


T14FIN 


016106 


2974 


T15 


016474 


3345 


T15A 


016556 


3367 




016610 


3379 


UOPARO* 


177660 


371« 


UOPARl' 


177662 




UDPAR2' 


177664 


373« 


(JDPARS* 


177666 


3744^ 


U()PAR4' 


177670 


375* 


UDPAR5> 


177672 


376* 


U0PAR6' 


177674 


377* 


UDPAR7- 


177676 


378* 


UOPORO- 


177620 


349* 


UDPORl" 


177622 


350* 


UDPDR2' 


177624 


351* 


UDP0R3" 


177626 


352* 


U0P0R4- 


177630 


353* 


UOPORS- 


177632 


354* 


UDPDR6« 


177634 


355* 


UDP0R7- 


177636 


356* 


UIPARO* 


177640 


360* 


UXPARl- 


177642 


361* 


UIPAR2> 


177644 


362* 


UIPAR3> 


177646 


363* 


UIPAR4- 


177650 


364* 


UIPAR5- 


177652 


365* 


UIPAR6" 


177654 


366* 


UIPAR7- 


177656 


367* 


UIPDRO* 


177600 


336* 


UIPORl- 


177602 


339* 


UIP0R2- 


177604 


340* 


UIP0R3- 


177606 


341* 


UZP0R4- 


177610 


342* 


UIP0R5" 


177612 


343* 


UIP0R6- 


177614 


344* 


UIP0R7- 


177616 


345* 


VIRl 


014250 


2851 


VZR2 


015736 


3131 


VIR3 


016054 


3109 


XBUF - 


177566 


491* 


XCSR - 


177564 


490* 


$APTHO 


000204 


547 


*ASTAT- 


****** u 


4212 


lATYC 


022062 


4183 


»ATY1 


022036 


4181* 


♦ ATYS 


022044 


3747 


»ATy4 


022054 


4184* 
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USER SYMBOLS 
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CROSS REFERENCE 


TABLE 


USER S 


tAUTOB 


021754 


«19* 


3988 


41094 








tCHARC 


020502 


3764* 


3774* 


3781 


3807* 


38124 




tCKSUR 


021200 


3980# 


4175 










$Ct1TAG* 


«««**• u 


768 


774 


776 








(CNTLC 


021725 


3991 


41044 










»CNTLU 


021720 


4006 


41034 












001026 


591» 














001277 


6734 


3763 


5624 


4019 


4105 




•06LK 


020742 


3850 


3884 


58924 








♦OEVCT 


001010 


5624 












tDOAGN 


020036 


3686 


3695 


57014 








lOTBL 


020752 


3853 


36884 










lENOAO 


020026 


534 


36974 










♦EWCT 


017774 


775 


36884 










lENULL 


020042 


3693 


37044 










♦ENV 


001020 


5874 


813 


5742 


4190 


4214 


4261 


•ENVM 


001021 


5884 


601 


5744 


5749 


4192 




*EOP 


017740 


36774 












lEOPCT 


017766 


775* 


36854 


3689 








»ERf LG 


001052 


6154 


776* 


4239* 








lERRQR 


022 S04 


770 


805 


42394 


4240 






»tTA8L 


001020 


5864 












tETEND 


OOlOSO 


559 


5984 










♦fATAL 


001002 


5794 


4218« 












022S02 


4181* 


4184* 


4212 


4221* 


42294 




»f ILLC 


020520 


3767 


38214 












020517 


38204 












»GET42 


020016 


36944 












(CTSUR 


021250 


39924 


4175 










•rv ■ 


000003 


204 


205 










•HIBTS 


000204 


5544 












• INTAG 


021755 


4020 


41104 










f Lr 


020523 


38244 


4094 


4103 










022301 


4222* 


42284 










inAlL 


001000 


555 


559 


5774 


795 


615 


5742 




AAA AA^ 

000206 


5554 












InFLG 


022300 


4182* 


4188 


4223* 


42274 








021743 


3995 


41074 












001014 


5844 


4198* 


4201 








•nSGLG 


001016 


5854 


4205* 










•HaliT I 


AA • AAA 

001000 


5784 


4196 


4204* 


4216 


4220* 




AMCljB 
• HbWH 


A"^ t T V *k 

021732 


3992 


41054 












020516 


3769 


38194 










AkMJT C T * 

VNUT ■ 


000001 


8314 


8564 


11664 


12594 


14974 


15414 


• OCNT 




25934 


26894 


27464 


28334 


2635 


29614 


021174 


3925* 


3954* 


39674 








lOnODE 


021176 


3920* 


3924* 


3929 


3932* 


3943* 


59694 


* o A e f 
IPA55 


AA • AA^ 

001006 


5814 


774* 


800* 


3676 


3662* 


S683* 


•KAb in 


AA.A ^ « A 

000212 


5574 










ADA 


022452 G 


42694 












ICRAS 


020522 


38234 


4038 


4067 


4105 






•RDCw 


021462 


40514 


4176 










♦ROOEC* 


• **••« tj 


4178 












• MUL i^i 




40794 


4177 










tROOCT* 


•••••• u 


4178 












IfiOSZ ' 


000010 


40724 













15754 

2965 



3691 



17134 
30774 



3704 



18864 

3079 



20360 
32904 



21864 
5292 



23094 
35524 



25694 
34594 
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c« 

USER SYMBOLS 



IRTNAO 


020040 




S705« 










IR2A - 


•****• 


U 


4178 










ISAvRE- 




U 


4178 










•SETUP. 


000126 




500* 


769 


770 


772 


774 


•STOP • 


177777 




500# 










ISVPC • 


000204 




532* 


557 








»SUR • 


160000 




204 


2054 


777 


836 


661 








2191 


2514 


2574 


2596 


2694 








5682 


5696 


3702 


5704 




*SUREG 


001022 




569* 


805 








•TESTN 


001004 




580« 


821* 


835« 


860* 


1170* 








2513* 


2575* 


259 7 • 


2695* 


2750* 


ITK6 


020510 




3788 


5795 


58164 


5975 


5984 


»TK5 


020506 




5786 


5795 


36154 


3973 


5962 


tTN 


000027 




204 « 


851 


6564 


856 


8614 








1575 


15804 


1713 


17184 


1866 








25744 


2595 


25984 


2669 


26944 








3290 


33004 


5332 


35374 


3439 


ITPB 


020514 




5804* 


38184 








iTPrLG 


020521 




5756 


58224 








ITPS 


020512 




5802 


56174 








tTRAP 


021756 




772 


41194 








ITRAP2 


022000 




4130# 


4166 








• TRP • 


000012 




4159^ 


41684 


41694 


41704 


41714 


1 TRPAO 


022012 




4124 


41664 








»TSTM 


000210 




556^ 










•TSTNU- 


000001 




495» 










ITT YIN 


021710 




4080 


4081 


4096 


41024 




ITyPBN* 


•••••• 


u 


4172 










» TYPOS 


020526 




38384 


4171 








IT yPE 


020152 




57564 


4159 


4167 


4209 




ITyPEC 


020364 




5766 


5775 


5780 


37654 


4024 


ITtPEX 


020504 




5808 


5810 


58134 






ITtPOC 


0207 76 




59254 


4168 








ITtPON 


021012 




3922 


59254 


4170 






1 T yPOS 


020752 




59164 


4169 








»L»4IT 


001012 




5854 










ICWITM 


000214 




5584 










»USUR 


001024 




5904 










IXOTF « 


000025 




5790 


3617 








IXON • 


000021 




5797 


3617 








1 IGET4« 


OOOOOO 




36964 










lOflLL 


021175 




3919* 


3923« 


3955 


39684 




I40CAT 


OOOOOO 




5184 










■ 


022472 




5054 


519 


5254 


532 


5554 








5654 


5664 


6294 


6304 


6404 








5619 


5620 


5821 


5622 


5825 








4111 


42504 


42704 






. lASTA' 




V 


4182 


4165 








. IX 


000204 




5454 


548 


560 


565 





776 


777 


610 


5662 


3975 


4109 






1171 


1264 


1502 


1546 


1560 


1718 


1691 


2041 


2751 


2840 


2970 


3084 


3300 


3337 


3444 


5674 


1263* 


1501* 


1545* 


1579* 


1717* 


1690* 


2040* 


2190* 


2659* 


2969* 


2972* 


5065* 


3299* 


SSSfc* 


344 3* 




4001 


4055 


4061 












5998 


4022* 


4053 


4059 










1166 


11714 


1259 


12644 


1497 


15024 


1541 


15464 


18914 


2056 


20414 


2166 


21914 


2509 


25144 


2369 


2746 


27514 


2855 


26404 


2961 


29704 


5077 


50844 


34444 
















41724 


4175 


41744 


4175 


41764 


41774 


41764 




5554 


5574 


545 


5444 


5464 


5484 


5604 


5614 


6754 


5704 


37054 


57184 


3815 


5816 


5817 


3818 


5824 


56254 


38924 


5975 


41024 


4103 


4109 


4110 



AOOPrlS 


29b09 


2965 










Be 3 








190* 








BGNTST 


1699 


ASA 

854 


859 


1 1 ^A 








3A VA 

<:B3B 


30J^A 
ctOB 




I AAA 








































f AAA 


SA.^A. 

3ooo 








3ooB» 










t AAA 










t AAA 


AK V 

B33 


fi 1 £A 


1 3^7 

1<:3 r 




£ '1 1 


3AAA 

e0O4 


3AA7 


3U '3 


c Done c 


% OdA 










t AAA 


7A V 
J A3 


AAA 


AA7 

BTf 1 






f ACA 


1U03 


1 A7iL 
lU rO 






f 3AA 


1 3AA 
leUO 


1 31 7 
Icl ' 






13jt 


130 r 


1 ^ ' 3 




1 AAA 




131 ' 


1 ^3«^ 




t iLA A 
104U 




1030 


lOOA 




1 ' »o 


1 7 7<i 


1 'P' 


1 7Q4 
1 ' »A 




1 ATA 

IB f B 


1 Q1 A 


1 A1 A 
l7lB 








3A33 




3n4>A 




AO 




31 tfl^ 
el03 


31 73 
c 1 f e 






3VCA 


3A 3A 


3AV1 
cA31 




^A^S 

2B23 


3AA. 1 

2Bol 


3 AAV 

eoB3 


V^A3 






« A 1 3 


VA3A 
3AcB 


TAii7 
3A3 f 






SK£3 
330c 


330B 


33 rO 






7AI 
'A3 


AAA 
BA"» 


A07 

B^ 1 




1 AAA 


1 ACA 


1 A&C 
1UD3 


\ A7JI 
lU 'O 




f 1 


1 3AA 


1 3AA 
levB 


1 31 7 
Icl ' 




Id 33 




1 YA7 


1 X7< 

13 r 3 




1 AAQ 


1 ^AA 

13UB 


11^ 1 7 
131 ' 


13cD 






1031 


1036 






1 7 7A 


f 7 7A. 
I f fO 


4 7A7 

I »B ' 


1 7AA 
1 f 9* 




1 A7A 


1 Q1 A 
l7lO 


1 A1 A 

191B 


1 A3il 




3A1 


3A33 


3A3A 


3A£A 




AO 


3 1 C£ 


2l03 


31 73 

21 '2 






3 VCO 


3A 3A 

2*24 


2451 




cBeo 


3AA. 1 


3AAS 

cBBS 


5UU2 






VA 1 3 


VA 3A 

3428 


VAC? 




3930 


3302 


330B 






3c3v 








roniuT 


1 A 










« A 


1 AAA 
lfl3A 








3c3v 










OTA 

3e3* 


A1 A 










30 r O 








e03cv 


eB33 








i^W f WW 


3079 






MULT 


323* 








NEWT ST 


188« 


323* 


830 


855 




2592 


26S6 


2745 


2832 


NXMHS 


3290* 


3292 






POP 


323* 


38 79 


4224 


4225 



D8 
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1262 


1500 


1544 


1578 


1716 




T3QA 


J J J J 






1495 


155A 


1572 


1710 

A ' AV 


1883 


3160 


3329 


3378 


3664 




905 


915 

7 A «7 


926 


942 


957 


1083 


1091 


1098 


1108 


1115 

A A A a' 


1225 


1242 


1251 

Afc A 


1296 


1502 


1412 


1418 


1426 


1432 


1440 


1535 


1551 


1557 

A WW > 


1563 


1569 


1671 


1677 


1686 


1693 


1699 


lAOO 


1807 


1815 

A VV A ^ 


1824 


1851 

A Vn^ A 


1931 


1937 


1944 


1955 


1962 


2068 


2075 


2081 


2087 


2094 


2178 


2256 


2263 


2269 


2275 


2438 


2444 


2450 


2660 


2666 


3018 


5033 


3044 


3055 


5066 


3465 


3473 


3485 


3496 


3506 


3588 


3594 


3600 


3614 


5622 


903 


915 


926 


942 


957 


1083 


1091 


1098 


1108 


1115 

A A * W 


1225 


1242 

Alb~C 


1251 


1296 


1302 


1412 


1418 

A^ AW 


1426 


1432 


1440 


1535 


1551 


1557 


1563 


1569 


1671 


1677 


1686 


1693 


1699 


1800 


1807 


1813 


1824 


1831 


1931 


1937 


1944 


1955 


1962 


2068 


2075 


2081 


2087 


2094 


2178 


2256 


2263 


2269 


2275 


2438 


2444 


2450 


2660 




3018 


3033 


3044 


3055 


3066 


3465 


3473 


3486 


5496 


3506 


3588 


3594 


3600 


3615 


3622 


1165 


1258 


1496 


1540 


1574 


2960 


3076 


3290 


5531 


3438 















1889 


2039 


2189 


2312 


2572 


2596 


2035 


2185 


2245 


2367 


2408 


2652 


970 


985 


996 


1009 


1021 


105.? 


1125 


1152 


1142 


1149 


1157 


1184 


1510 


1516 


1524 


1350 


1558 


1544 


1446 


1454 


1460 


1469 


1475 


1485 


1600 


1608 


1615 


1621 


1627 


1654 


1705 


1756 


1744 


1751 


1757 


1763 


1857 


1844 


1850 


1859 


1866 


1872 


1968 


1975 


1986 


1995 


1999 


2006 


2105 


2112 


2118 


2125 


2156 


2145 


2288 


2295 


2301 


2535 


2540 


2546 


2672 


2678 


2725 


275^ 


2811 


2817 


5118 


5181 


3186 


5515 


5518 


5525 


5516 


3524 


3532 


5536 


3544 


5550 


5628 


5654 


3640 


3646 


3654 




970 


985 


996 


1009 


1021 


1052 


1125 


1132 


1142 


1149 


1157 


1184 


1510 


1516 


1524 


1550 


1558 


1544 


1446 


1454 


1460 


1469 


1475 


1485 


1600 


1608 


1615 


1621 


1627 


1634 


1705 


1736 


1744 


1751 


1757 


1763 


1857 


1844 


1850 


1859 


1666 


1872 


1968 


1975 


1986 


1993 


1999 


2006 


2105 


2112 


2118 


2125 


2156 


2145 


2288 


2295 


2301 


2333 


2540 


2346 


2672 


2678 


2725 


2757 


2811 


2817 


3118 


3181 


3187 


3313 


3318 


3323 


3516 


3525 


3532 


3538 


3544 


3550 


3628 


3634 


3640 


3646 


3654 




1712 


1885 


2055 


2185 


2508 
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CROSS RfreRENCE TABLE 



MACRO NAMES 



SEQ 00<<5 



POSH 

REPORT 

SCOPE 

SETPRI 

SETTRA 

SETUP 

SKIP 

SLASH 

SPACE 

STARS 



SWRSU 

TAIL 

TRMTRP 

TYPBIN 

TYPOEC 

TrP^^AM 

TYPNUM 

TYPQCS 

TyPOCT 

TYPTXT 

ItESCA 

ItNEUT 

»»GET 
»ISETM 
ttSKiP 
.EOUAT 
.MEAOE 
.KTJl 
.SETUP 
. tACTl 
. »APTB 
. lAPTH 
, IAPTy 
. ♦EOP 
. »ERRO 
. tREAO 
. STRAP 
.«TYPO 
. »TYPE 
.»TYPO 
. »40CA 



525* 
523# 
218» 
5219 
4134« 
166« 
525« 
525# 
525* 
52Z9 
1499 
2369 
5079 
4043 
5219 
19 
4156* 
5259 
5259 
5259 
5259 
5259 
5259 
5259 
5259 
5259 
2689 
4140« 
7959 
525« 
1A8« 
190« 
186« 
190# 
1909 
188« 
190# 
1919 
188« 
1919 
191# 
190# 
189« 
189« 
1919 

i6a« 



3358 



4159 
323« 



550 
1541 
2571 
3081 
4072 

7779 
3666 



3691 



3993 



631 
2746 
4159 

800 

215 
195 
523 
500 
528 
573 
538 
4178 
3669 

3970 
4111 
3826 
3719 
3693 
501 



4185 



4166 

767 



540 
1543 
2593 
3290 
4113 



4187 



4169 



542 
1575 
2595 
5292 
4160 



4208 



4170 



549 

1577 
2689 
5297 
4235 



4171 



575 
1713 
2691 
3352 



4173 



851 
1715 
2746 
3354 



4175 



833 
1886 
2748 
5439 



4176 



856 
1888 
2855 
5441 



4177 



858 
2056 
2855 
5671 



1166 
2058 
2857 
5721 



1166 
2166 
29G1 
5826 



1259 
2168 
2965 
5695 



1261 
2509 
2967 
3972 



149^ 
2311 
3077 
3975 



656 
2653 
4166 



1166 1259 
2961 3077 
4169 4170 



1497 1541 
5290 5332 
4171 4175 



1575 1713 
5459 

4175 4176 



1666 
4177 



2036 



2166 



2309 



2369 



2593 



ABS. 022472 



000 



ERRORS DETECTED: 0 

CZKDKB/EN: ABS . CZKDKB . SEQ/CRr/OOC/SOL/NL : TOC-SYSMAC . SML/ML .CZKOKB .MAC/ML .KDJl lA .MAC 
RUN- TIME: 297 115 5 SECONDS 
RUN-TIME RATIO: 941/416-2.2 
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